Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
19.04.2024 14:04:05
PDF per VBA ausgeben - Seitenskalierung
19.04.2024 13:58:02
Set Worksheet geht im O365 aber im Excel 2016 nicht
19.04.2024 13:49:38
Per Kopfdruck als pdf speichern und Mail erstellen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1872to1876
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1872to1876
1872to1876
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Per VBA Datei öffnen

Per VBA Datei öffnen
04.03.2022 17:07:07
Günther
Hallo in die Expertenrunde,
ich habe eine kleine Frage zu dem Öffnen einer Datei per VBA mittels SHELL und CMD unter der Rahmenbedingung, dass der Dateiname ein & enthält.

shell "cmd /C ""C:\temp\A und B.pdf""" 'funktioniert
shell "cmd /C ""C:\temp\A & B.pdf""" 'funktioniert nicht
Gibt es einen Weg, dies ohne voriges Umbenennen der Datei zu lösen? Wenn ja, wie?
Danke im Voraus für alle Rückmeldungen.
Grüße
Günther

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Per VBA Datei öffnen
05.03.2022 08:13:01
Peter
Aus anderen Zusammenhängen kenne ich, dass man manchmal das "&" verdoppeln muss! Teste mal!
AW: Per VBA Datei öffnen
04.03.2022 17:25:33
Nepumuk
Hallo Günther,
versuch es so:

Option Explicit
Private Declare PtrSafe Function ShellExecuteA Lib "shell32.dll" ( _
ByVal hwnd As LongPtr, _
ByVal lpOperation As String, _
ByVal lpFile As String, _
ByVal lpParameters As String, _
ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As LongPtr
Private Const SW_MAXIMIZE As Long = 3
Public Sub Test()
ShellExecuteA 0, "OPEN", "C:\temp\A & B.pdf", vbNullString, vbNullString, SW_MAXIMIZE
End Sub
Gruß
Nepumuk
Anzeige
AW: Per VBA Datei öffnen
04.03.2022 22:06:58
Günther
Danke Nepumuk - funktioniert bestens - es ist immer ein Vergnügen, vom Profi zu lernen ...
Grüße
Günther
AW: Per VBA Datei öffnen
06.03.2022 15:36:44
Günther
Hallo Nepumuk,
ich habe mich leider zu früh gefreut :-(
Die Lösung mit ShellExecuteA lässt sich zwar von &-Zeichen nicht beirren, dafür werden aber Unicode-Zeichen im Dateinamen nicht unterstützt.
(Mein bevorzugtes Unicode-Testzeichen ist ≤ oder ≥ .)
Selbiges ist wiederum für die Shell/CMD-Variante kein Problem.
Sollte ein Dateiname aber &-Zeichen UND Unicode-Zeichen beinhalten, geht keine der beiden Varianten ... :-(
Kennst Du noch eine Alternative?
Viuele Grüße und Danke
Günther
Anzeige
AW: Per VBA Datei öffnen
06.03.2022 17:04:58
Nepumuk
Hallo Günther,
dann versuch es so:

Option Explicit
Private Declare PtrSafe Function ShellExecuteW Lib "shell32.dll" ( _
ByVal hwnd As LongPtr, _
ByVal lpOperation As LongPtr, _
ByVal lpFile As LongPtr, _
ByVal lpParameters As LongPtr, _
ByVal lpDirectory As LongPtr, _
ByVal nShowCmd As Long) As LongPtr
Private Const SW_MAXIMIZE As Long = 3
Public Sub Test()
Dim strFilename As String
strFilename = Dir("C:\temp\*.pdf")
ShellExecuteW 0, StrPtr("OPEN"), StrPtr("C:\temp\Test" & ChrW$(&H2264) & ".pdf"), 0, 0, SW_MAXIMIZE
End Sub
Meine Testdatei hat den Namen: Test≤.pdf
Gruß
Nepumuk
Anzeige
AW: Per VBA Datei öffnen
07.03.2022 09:25:15
Günther
Hallo Nepumuk,
Danke Dir - funktioniert super!
Grüße Günther
AW: Per VBA Datei öffnen
06.03.2022 17:31:30
Anton
Hallo Günther ,
probier es so:

Sub b()
  Dim pfad As String  
  pfad = Range("A1")  'Pfad in Zelle A1 speichern
  CreateObject("Shell.Application").ShellExecute pfad, "", "", "open", 1
End Sub  

mfg Anton
Anzeige
AW: Per VBA Datei öffnen
07.03.2022 09:24:07
Günther
Hallo Anton,
Danke Dir - funktioniert super!
Grüße Günther

331 Forumthreads zu ähnlichen Themen

VBA Word / Excel / Datendatei
Franjo

Hallo an alle,
ich möchte aus Word-VBA (Userform) Daten aus einer Datei auslesen und bei Bedarf den Sprung zur Dateneingabe in diese Datei machen.
1. Gedanke: Textdatei anlegen und die Daten auslesen/schreiben
habe ich verworfen, da mir das Wissen fehlt, eine Textdatei nach bestimmt...
09.04.2009 19:40:47
Thread-ID: 1068109
2 Beiträge
Anzeige
Word Datei aus Excel heraus öffnen?
Micha

Hallo liebe Spezialisten,
ich habe hier im Forum den unten stehenden Code gefunden, mit dem ich über einen Button in meiner Excelmappe die Word Datei öffnen kann.
Da beide Dateien auf dem Server liegen und nicht alle User das gleiche Laufwerksmapping "P:\ " haben, möchte ich fragen ob m...
05.11.2009 13:02:10
Thread-ID: 1114713
5 Beiträge
Mit VBA Datei auf Server öffnen
egon.kernien@online.de

Hallo Experten!
Ich lasse mit diesem Code eine Exceldatei pda.xls die auf einem Server liegt so öffnen, Daten aus einer Tabelle lesen-kopieren, schliessen.:
ChDir Pfad
strFile = Application.GetOpenFilename
If strFile = "Falsch" Then Exit Sub
Set wbSource = Workbooks.Open(Fi...
03.12.2009 11:32:17
Thread-ID: 1121538
3 Beiträge
Anzeige
Per VBA Excel Datei öffnen und Register wechseln
christoph

Hallo, ich habe als VBA Laie folgendes Problem. Ich möchte im Rahmen eines Makros eine andere bereits geöffnete Exceldatei aktiveren und in dieser neu aktivierten Datei das Registerblatt wechseln - was leider nicht funktioniert. Bisher habe ich folgenden VBA Code zum aktivieren der Datei und...
31.03.2010 15:03:42
Thread-ID: 1149665
9 Beiträge
mit VBA Word-Dokumente ausdrucken WICHTIG!!!!
Stefan Sasse

Hallo,wer kann mir hier weiterhelfen? Ich will in Excel-VBA Word-Dokumente automatisiert ausdrucken, d.h. ich habe mehrere Dateien, die in einer Schleife gesucht werden und dann verschoben werden, nach dem Verschiebe-Vorgang soll die Datei ausgedruckt werden. Wie mache ich dass?Bitte um Antwort...
26.04.2002 09:44:31
Thread-ID: 116512
2 Beiträge
per vba hyperlink von excel in worddokument
excel

Hallo,
ich öffne in einem makro ein word-dokument und füge dort zellinhalte in textmarken ein.
in einer der zellen steht ein hyperlink. wie bekomme ich es hin, dass ich in word dann auch einen hyperlink habe und nicht nur den text der zelle
Gruß
effha
25.10.2010 19:58:40
Thread-ID: 1183824
3 Beiträge
VBA in Word
Jesús

Hallo Zusammen,
nach dem mein letztes Problem hier erfolgreich gelöst wurde, stehe ich vor einer neuen Hürde.
Folgendes:
Ich habe ein Word Dokument mit einer Tabelle (siehe Anhang). https://www.herber.de/bbs/user/73584.doc
In dieser Tabelle soll die Versionierung gepflegt werde...
16.02.2011 16:41:33
Thread-ID: 1201211
22 Beiträge
VBA in Word mit Mergefields/Textformularfeldern
Martin

Guten Tag
Hoffe, es kennt sich jemand gut mit Word aus hier im Excel-Forum...
Ich habe ein Word-Template mit Mergefields und Textformularfeldern. Die Mergefields werden beim Öffnen automatisch durch eine andere Applikation (die kann ich nicht ändern) abgefüllt. Ich möchte jetzt, dass da...
16.02.2011 18:12:05
Thread-ID: 1201235
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
3
4
2
2
8
1
2
21
3
3
3
5
3
5
7
3
5
6
8
6
1
2
8
2