Arbeitsmappen Ansprechen

Inhalt

✓ Arbeitsmappen ansprechen: ThisWorkbook, ActiveWorkbook, Name und Index
✓ Pfad und Dateiname auslesen
✓ Arbeitsmappen schließen, öffnen, speichern und neu erstellen
✓ Arbeitsmappen in einer Variable speichern und ansprechen

 

Code

Sub Arbeitsmappen() 
 
'Arbeitsmappen ansprechen 
MsgBox ThisWorkbook.Path 
MsgBox ThisWorkbook.FullName 
MsgBox ActiveWorkbook.FullName 
Range("A1").Value = Workbooks("Kundendaten.xlsm").FullName 
 
'Arbeitsmappe schließen 
Workbooks("Kundendaten.xlsm").Close savechanges:=True 
 
'Arbeitsmappe öffnen 
Workbooks.Open Filename:="C:UserskaiweDesktopKundendaten.xlsm" 
 
'Arbeitsmappe speichern 
Workbooks("Kundendaten.xlsm").SaveAs Filename:="C:UserskaiweDesktopStammdaten.xlsm" 
 
'Neue Arbeitsmappe erstellen 
Dim NewBook As Workbook 
Set NewBook = Workbooks.Add 
 
'Bereitgestellt von VBATrainer: www.vbatrainer.de

End Sub

9. Arbeitsmappen

Share on linkedin
Share on xing
Share on email
Share on whatsapp
Share on facebook

Ähnliche themen

VBATrainer Excel VBA Coaching - Dozent Kai Weissmann

Kai Weissmann

VBA Entwickler

Hallo und schön, dass du hier bist! Schau dich gerne in meinen Blog-Posts um. Falls du Fragen zu einem Thema hast, schreib mir gerne einen Kommentar.

Kai Weissmann

Persönliche Empfehlungen
Mein Kurs

Jetzt registrieren

Close Bitnami banner
Bitnami