Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Tabelle mit VBA zusammenkopieren |
01.09.2011 15:22:39 |
Nick |
|
|
|
02.09.2011 19:34:02 |
Gast51463 |
|
|
|
04.09.2011 15:27:04 |
Till |
|
|
|
04.09.2011 15:28:26 |
Till |
|
|
|
05.09.2011 08:14:23 |
Nick |
|
|
Von:
Nick |
Datum:
01.09.2011 15:22:39 |
Views:
1882 |
Rating:
|
Antwort:
|
Thema:
Tabelle mit VBA zusammenkopieren |
Hi
da ich mich mit VBA nicht auskenne nun mein Hilferuf. Ich möchte aus 2 vorhandenen Sheets ein 3tes erzeugen. In den beiden vorhandenen Sheets sind Filialen und Artikelgruppen mit jeweils Tabellenkopf und Spalte A,B,C. In der neuen Tabelle soll nun immer Filiale und dann alle Artiekl aufgelistet stehen befor die nächste Filiale aufgelistet wird.
Bsp.: Sheet3:
Filiale1 Artikel1
Filiale1 Artikel2
Filiale1 Artikel3
Filiale2 Artikel1
Filiale3 Artikel2
...
Ich habe mir dabei sowas ausgedacht aber es funktioniert nicht.
Private Sub CommandButton2_Click()
Dim i As Integer 'Zähler
Dim j As Integer
Dim zzKST As Integer 'Ende Tabellen
Dim zzWG As Integer
zzKST = Sheets(4).UsedRange.Rows.Count
zzWG = Sheets(5).UsedRange.Rows.Count
For i = 2 To zzKST
For j = 2 To zzWG
Sheets(4).Range(Cells(i, 1), Cells(i, 3)).Copy Destination:=Sheets(6).Range("A" & i) 'bis hier geht es
Sheets(5).Range(Cells(j, 1), Cells(j, 3)).Copy Destination:=Sheets(6).Range("F" & j) 'ab hier geht es nicht
Next j
Next i
End Sub
Ich bitte um Hilfe und eine andere Idee / Code oder was auch immer... :(
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Tabelle mit VBA zusammenkopieren |
01.09.2011 15:22:39 |
Nick |
|
|
|
02.09.2011 19:34:02 |
Gast51463 |
|
|
|
04.09.2011 15:27:04 |
Till |
|
|
|
04.09.2011 15:28:26 |
Till |
|
|
|
05.09.2011 08:14:23 |
Nick |
|
|