Tabellenkalkulation

Importierte Sheets umbenennen

Diskussionsgruppen
Betriebsysteme: Windows 7; WindowsVista; WindowsXP; Linux; BS-Sonstige
Software: Textverarbeitung; Tabellenkalkulation; Datenbanken; Bildbearbeitung; Audio/mp3/Video; Security/Viren; E-Mail/Outlook; Internet Browser; SW-Sonstige
Hardware: Mainboard/CPU/RAM; Grafikkarten; Peripherie; HW Sonstiges
Netzwerk: DSL; W-Lan; Telekommunikation; NW-Sonstiges
Programmierung: Skripte(PHP,ASP,Perl...); Webseiten/HTML
Sonstiges: PC-Sonstiges; Plauderecke

Frage

Hallo zusammen! Ich importiere zur Zeit in ein Excel File mehrere Sheets aus anderen Excel-Files und möchte den importierten Sheets per Makro gerne einen neuen Namen verpassen! Kann mir hier jemand weiterhelfen? Viele Grüße, Peejay

Antwort 1 von piano

Hallo
Mach eine Makro-Aufzeichnung: wechsle zu einem Sheet und ändere den Namen.
Sieh dir den Code an, da findest du alles was du brauchst.
Gruss piano
PS. weitere Hilfe, wenn notwendig, dann aber bitte mehr Details!

Antwort 2 von Peejay Joy

Du meinst so oder?

ThisWorkbook.Sheets(1).Select

Set ThisWorkbook.Sheets(1).Name = "x"

Das funktioniert leider nicht. Wird einfach ignoriert...

Grüße,
Peejay

Antwort 3 von piano

Hallo

Sub Test()
ThisWorkbook.Sheets(1).Select
ThisWorkbook.Sheets(1).Name = "x"
End Sub

funtioniert!
Gruss piano

Antwort 4 von Peejay Joy

Hallo piano!

Das geht leider auch nicht... Die Namenszuweisung wird einfach ignoriert. Ob mit oder ohne "Set". Ich hab´ das Ding schon gedebuggt und die Parameter mit "Maus drüberhalten" geprüft. Passt alles... Nur wird der Name nicht übernommen. Zumindest nicht nach außen sichtbar.

Grüße,
Peejay