soort van verzamelstaat op apart werkblad

[peng]

goeie middag jongens en meisjes, dames en heren

hier ben ik weer voor de zoveelste keer D)

is het mogelijk om op het onderstaande document een extra werkblad te maken die de verzameling van alle gegevens die er in worden gezet te verzamelen, waarbij staat op welk werkblad het neer is gezet ?

 

[wiki]

http://www.helpmij.nl/forum/showthread.php?t=377918&highlight=samenvoegen

Dit is waarschijnlijk een oplossing voor een deel van je vraag

Suc6 Wim

 

[peng]

bedankt wim het is iig een stukje duidelijk maar ik zit nu met een probleem.
ik krijg steeds een foutmelding van de macro, maar weet niet wat ik fout heb gedaan.

Sub TotaalBlad()

    Worksheets.Add before:=Sheets(1)
    Sheets(1).Name = "TOTAAL"
    
    For i = 2 To Sheets.Count
        With Sheets(i)
            .Range("A1:B:C:D:E:F" & .Range("A" & Cells.Rows.Count).End(xlUp).Row).Copy _
                Sheets(1).Range(Cells(Rows.Count, 1).End(xlUp).Offset(IIf(Sheets(i).Index = 2, 0, 1)).Address)
        End With
    Next i

End Sub

 

[wiki]

Range("A1:B:C:D:E:F" &

vervangen door

Range("A1:F" &

Maar volgens mij heb je ook kolom G nodig. Dan moet je de F vervangen door G.

gr Wim

 

[peng]

bedankt voor je snelle reply wim

dan heb ik nog twee vragen hierover.
is het mogelijk om ook de breedte van de cellen over te nemen ?

en is het mogelijk om dit te maken zodat het automatisch wordt toegevoegd (dus zonder dat je op de macro hoeft te drukken )?

ps is er een gratis website waar je wat kan leren over het gebruiken van VB met excel en de formules die in excel te gebruiken zijn ?

 

[wiki]

Je zit al op een gratis website

Kijk regelmatig rond en bekijk afgehandelde vragen met bijlagen.

Je kunt ook een boek kopen VBA voor beginners.

Gr Wim

 

[peng]

zal wel even rond bellen, volgens mij heeft een vriend van mij nog een boek over vba voor beginners

maar zit nog steeds met de volgende 2 vragen

is het mogelijk om ook de breedte van de cellen over te nemen ?

en is het mogelijk om dit te maken zodat het automatisch wordt toegevoegd (dus zonder dat je op de macro hoeft te drukken )?

 

[peng]

goede morgen,

ik zit nog steeds met de 2 volgende vragen

is het mogelijk om ook de breedte van de cellen over te nemen ?

en is het mogelijk om dit te maken zodat het automatisch wordt toegevoegd (dus zonder dat je op de macro hoeft te drukken )?

 

[peng]

heeft iemand al over mijn laatste 2 vragen nagedacht ?