Forum: PC-Programmierung Excel - Makro dass nur ein Tabellenblatt speichert


von Jo Mc (Gast)


Lesenswert?

Hallo,

Ich habe ein Ecel Dokument mit mehreren Tabellenblättern.

Nun möchte ich auf dem Tabellenblatt 1 einen Button der mir das 
Tabellenblatt 3 in ein bestimmtes Verzeichnis unter einen bestimmten 
Dateinamen ablegt.

Die anderen Tabellenblätter sollen dabei nicht mit abgespeichert werden!

Da mit dem Button und dem Vertzeichnis, sowie den Dateiname... bekomme 
ich ohne weiteres hin.

Aber wie kann ich in das Makro schreiben, dass er nicht alles sondern 
nur das eine Tabellenblatt abspeichert?
Also dass die gespeicherte Datei nur aus einem Tabellenblatt besteht.

Ich habe schon einiges Probiert... Jetzt habe ich keine Ideen mehr.

Könnt ihr mir helfen?

Danke! Gruß Jo!

von Werner A. (homebrew)


Lesenswert?

Kannst du nicht einfach das Blatt in eine neue Tabelle kopieren und dann 
speichern?

von Christian J. (elektroniker1968)


Lesenswert?

Hallo,

das geht nicht, weil es auch keine normale Funktion gibt, die ein 
Arbeitsmappe als einzelne Tabellen einzeln speichern kann. Über VB ist 
nur das erreichbar, was man auch von der Shell manuell aus erreichen 
kann, denn das sind auch nur Makros. Zudem ist das Schreiben von Dateien 
auf Platte eingeschränkt (Viren), vermutlich ist der Befehlssatz auch 
begrenzt und entspricht nicht dem vollen Visual Basic.

Ich wüsste mal gern, wie das Excel Sheet funktioniert, was eine Fussball 
Tippgemeinschaft zur EM verwaltet, glaube das kann sogar kochen und 
abspülen, lädt aus dem Netz Daten runter, wertet diese aus etc. 
Umwerfend programmiert.

Gruss,
Christian

von thomas (Gast)


Lesenswert?

hallo,

ich habe eine Mappe mit 12 sheets ( Januar bis Dezember)

mit:

Sheets("Juli").Copy

wird eine neue Mappe erzeugt die nur das sheet "Juli" enthält.

diese mappe speichern wohin du willst und fertig.



thomas

von Werner A. (homebrew)


Lesenswert?

Du kannst ja einfach mal ein Makro aufzeichnen. Da steht dann genau der 
Befehl drin.
1
Sub Makro1()
2
'
3
' Makro1 Makro
4
' Makro am 11.06.2008 von aufgezeichnet
5
'
6
7
'
8
    Sheets("Tabelle1").Select
9
    Sheets("Tabelle1").Copy
10
End Sub

Bitte melde dich an um einen Beitrag zu schreiben. Anmeldung ist kostenlos und dauert nur eine Minute.
Bestehender Account
Schon ein Account bei Google/GoogleMail? Keine Anmeldung erforderlich!
Mit Google-Account einloggen
Noch kein Account? Hier anmelden.