|
VBasic / vb.net / vbs / wsh : Dateiinfo auslesen
Nepumuk am 18.03.2008 um 09:44 Uhr (0)
Hallo Wolfgang,die "nichtbenutzerdefinierten" kannst du auch über das Shell-Objekt auslesen.Hier mal ein Beispiel in Excel, mit dem du alle Eigenschaften der Dateien in einem Ordner auflisten kannst. Das ganze geht natürlich auf für eine einzelne Datei und einzelne Eigenschaften. Dazu benötigst du einen leicht geänderten Code.Code:Public Sub Dateieigenschaften() Const STRFOLDER As String = "C:Dokumente und EinstellungenMax KafflDesktop" Dim objShell As Object, objFolder As Object Dim intIndex As Integer ...
|
| In das Form VBasic / vb.net / vbs / wsh wechseln |
|
Excel : Beim Speichern nur mit HexBezeichnung?
Nepumuk am 31.01.2008 um 19:02 Uhr (0)
Hi,beim Speichern einer Exceldatei wird erst eine temporäre Datei ohne Endung erzeugt. Diese wird erst, wenn das speichern abgeschlossen ist, umbenannt. Gerade in stark ausgelasteten Netzwerken kann es vorkommen, dass diese temporäre Datei nicht umbenannt wird. Ich habs auch schon erlebt, dass unter solchen Bedingungen zwei User die selbe Exceldatei erfolgreich im Vollzugriff geöffnet hatten. Etwas nähere Info für deinen Admin findest du hier: http://support.microsoft.com/default.aspx?scid=kb;de;814112 --- ...
|
| In das Form Excel wechseln |
Bild_per_Formel.zip.txt |
Excel : Bild in Tabelle per Makro einfügen
Nepumuk am 21.06.2007 um 18:55 Uhr (1)
Hallo Klaus,ich hab dir mal eine Beispielmappe gemacht. Eigentlich ist es nämich nicht möglich per Formel eine Datei zu öffnen. Kann also manchmal etwas unerwartetes passieren.------------------GrußNepumuk
|
| In das Form Excel wechseln |
|
VBasic : kontextmenue
Nepumuk am 01.06.2005 um 21:52 Uhr (0)
Hi, ich habe ehrlich gesagt vom VBA-Editor in Autocad keine Ahnung. Ich habe mit CAD noch nicht mehr, wie mal eine Sechskantschraube gemacht. (In knapp sech Stunden, ist doch nicht schlecht. Oder??? Du kannst es ja mal versuchen. Ich habe gerade eine Beitrag dazu für Excel geschrieben: http://www.online-excel.de/excel/singsel_vba.php?f=80 ------------------ Gruß Nepumuk
|
| In das Form VBasic wechseln |
|
VBasic : Werte aus VBA in EXCEL-Tabelle eintragen
Nepumuk am 24.08.2005 um 10:42 Uhr (0)
Hallo Günther,AutoCAD - VBA hmm. Da kennt sich startrek besser aus. Aber versuch es mal so, das funktioniert zumindest aus VB heraus:Private Sub Main() Dim P As String, n As String, M As String P = "300" n = "4.0" M = "328" Dim xlApp As Object Dim xlWbk As Object Dim xlWks As Object Dim lngLastRow As Long On Error Resume Next Set xlApp = CreateObject(Class:="Excel.Application") On Error GoTo Err_exit If Err.Number 0 Then _ Err.Raise Number:=vbObjectError + 1, _ Description:="Excelinstan ...
|
| In das Form VBasic wechseln |
|
Excel : Zellenmarkierungen aufheben
Nepumuk am 27.10.2004 um 17:44 Uhr (0)
Hallo Thomas, letzteres! ------------------ Gruß Nepumuk
|
| In das Form Excel wechseln |
|
Excel : Formelverknüpfung mit Arbeitsbattdate
Nepumuk am 17.04.2005 um 20:57 Uhr (0)
Hallo Kristof, Zellverknüpfungen können nur zwischen Excelmappen (.xls) bestehen. Eine CSV - Datei (Comma Separated Value) kommt einer Textdatei näher wie einer Excelmappe. ------------------ Gruß Nepumuk
|
| In das Form Excel wechseln |
|
Excel : EXCEL VBA - kein Ergebnis Datei speichern unter
Nepumuk am 25.06.2005 um 07:41 Uhr (0)
Hi, die GetSaveAsFilename - Methode liefert nur den Dateinamen incl. Pfad zurück. Speichern musst du schon selbst. ThisWorkbook.SaveAs New_filename ------------------ Gruß Nepumuk
|
| In das Form Excel wechseln |
|
Excel : Start von Makros
Nepumuk am 25.08.2005 um 17:06 Uhr (0)
Hi,indem du den Code durch das Open - Ereugnis der Mappe startest. Beispiel:Private Sub Workbook_Open() Call Dein_MakroEnd SubDieses Makro muss in das Klassenmodul der Mappe. Einfach einen Rechtsklick auf das Excelicon neben "Datei" - Code anzeigen.------------------GrußNepumuk
|
| In das Form Excel wechseln |
|
Excel : Excel Datei eigenschaften
Nepumuk am 11.03.2006 um 19:46 Uhr (0)
Hi Alex,die Klammer des Cells-Objektes ist falsch gesetzt.Cells(InI, 2) = FileLen(.FoundFiles(InI))------------------GrußNepumuk
|
| In das Form Excel wechseln |
|
Excel : Excel Datei eigenschaften
Nepumuk am 13.03.2006 um 20:35 Uhr (0)
Hi Alex,das geht sehr schnell mit einer DLL von Microsoft. http://support.microsoft.com/kb/224351/en-us Im Download ist auch ein Beispiel für VB6.0, welches du fast 1:1 in VBA übernehmen kannst. Wenn du kein VB hast, dann kann ich dir auch ein VBA-Beispiel geben.------------------GrußNepumuk
|
| In das Form Excel wechseln |
|
Excel : Excel Datei eigenschaften
Nepumuk am 13.03.2006 um 21:45 Uhr (0)
Hi Alex,ich häng dir die DLL mal an. Die muss ins Systemverzeichnis und registriert werden. Dann musst du in Excel einen Verweis auf die DLL setzten. Hier mal ein Beispiel, wie du damit die CustomDocumentProperties auslesen kannst.Code:Option ExplicitPublic Sub prcReadCustomProperty() Dim objFilePropReader As DSOleFile.PropertyReader Dim objDocProp As DSOleFile.DocumentProperties Dim objCustProp As DSOleFile.CustomProperty Dim objFSO As Object, objFile As Object Set objFilePropReader = New DSOleFile.P ...
|
| In das Form Excel wechseln |
|
Excel : Excel Datei eigenschaften
Nepumuk am 13.03.2006 um 22:09 Uhr (0)
Und für die Verfechter von "Late Binding":Code:Option ExplicitPublic Sub prcReadCustomProperty() Dim objFilePropReader As Object, objDocProp As Object, objCustProp As Object Dim objFSO As Object, objFile As Object Set objFilePropReader = CreateObject("DSOleFile.PropertyReader.1") Set objFSO = CreateObject("Scripting.FileSystemObject") For Each objFile In objFSO.GetFolder("D:Eigene DateienEigene Excelformeln").Files Set objDocProp = objFilePropReader.GetDocumentProperties(objFile.Path) For Each o ...
|
| In das Form Excel wechseln |
