Öffnen einer Datei in VBA

Question

ich diesen Code haben, eine Datei zu öffnen versucht:

Dim wbTemplate as Workbook 
Dim template as String 

template = ThisWorkbook.Path & "\sample.xlsx" 
Set wbTemplate = Worbooks.Open(template) 

Ich habe auch versucht:

Set wbTemplate = Worbooks.Open(filename:=template) 

aber beide funktioniert nicht. Die aktive Arbeitsmappe und die Datei, die ich öffnen möchte, haben übrigens das gleiche Verzeichnis. Irgendwelche Ideen? Vielen Dank!

Answer 1

Dies ist, was ich benutze,

Dim FileName As String 

FileName = ActiveWorkbook.Path & "\CRMS.csv" 
Workbooks.Open (FileName) 

Answer 2

Try .Add statt .Open zu verwenden:

Dim fName As String 

fName = "YourPath\Sheetname.xlsx" 
Workbooks.Add (fName) 

oder:

Set NewBook = Workbooks.Add(fName) 

Bis jetzt funktioniert es immer mich. Manchmal schlägt die Open-Methode aus verschiedenen Gründen fehl (Zugriffsrecht auf Ordner, geschützte Arbeitsmappe usw.).

Answer 3

@RobinMackenzie entdeckte es.

Aber man kann diese Art von Verwirrung vermeiden und Option Explicit

unter Verwendung von irreführenden Fehlermeldungen loszuwerden

als Beispiel Ihr Szenario verwenden, wenn Sie Option Expilict verwenden, wird der VBE das Wort markiert worbooks nur, wenn Sie ausführen versuchen der Code und in der irre führt

auch die Fehlermeldung ist genauer: Variable not defined

Ohne Option Explicit, VBE die ganze Reihe beleuchtet und wirft einen irreführenden Fehler (correc t aber irreführend): Object required

Hier lesen Sie mehr: https://blogs.msdn.microsoft.com/developingfordynamicsgp/2009/08/06/what-does-option-explicit-do-in-vba/