Herbers Excel-Forum - das Archiv
2 Fragen
Informationen und Beispiele zu den hier genannten Dialog-Elementen:
- 2 Fragen von golem vom 04.11.2003 16:06:57
Betrifft: 2 Fragen
von: golem
Geschrieben am: 04.11.2003 16:06:57
Hallo,
habe gleich 2Fragen:
1. Wie kann ich per Makro in mehrere Tabellen den Inhalt aus einer anderen Tabelle kopieren, z.B. 50 Tabellenblätter in die jeweils in Zelle J4 der Wert einer Zelle aus einem anderen Tabellenblattes reinkopiert wird(dieses Blatt gehört nicht zu den 50)?
Problem:Wie durchlaufe ich alle Blätter? Sheets("xy").select?
2. ich hätte gerne für die 50 Tabellenblätter EIN "dynamisches" Diagramm erstellt(Pivottabelle?), d.h. per Klick auf Tabellennamen(aus Listbox) soll das Diagramm nur die Datenquellen für das angeklickte Tabellenblatt beinhalten.
Wäre spitzenmässig einige Hilfestellungen zu erhalten!
MFG
Golem
Betrifft: 2. Frage noch offen PIVOT TABELLE
von: Regina
Geschrieben am: 04.11.2003 17:47:18
Hallo Golem,
1. Frage
Alle Tabellenblätter durchsuchen
Sub test()
For i = 1 To 50
For Each ws In ThisWorkbook.Worksheets
If ws.Name = "Tabelle" & i Then
'dein code
End If
Next
Next
End Sub
2. Frage kann ich dir nicht helfen
Gruß REgina
Betrifft: AW: 2. Frage noch offen PIVOT TABELLE
von: golem
Geschrieben am: 05.11.2003 08:55:49
Danke Regina für deine Hilfe!