• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Copy diverse cellen van Blad1 naar Blad2

Status
Niet open voor verdere reacties.

regenTon

Gebruiker
Lid geworden
6 mei 2015
Berichten
33
Ik heb een vba/macro code ergens gevonden die ik begrijp (ik ben een beginner), echter ontbreekt er nog een gedeelte, dat heb ik in de code bijgeschreven.

Alvast bedankt voor de hulpBekijk bijlage Map1.xlsm
 
Stel de vraag in de editor ipv ergens verstopt in de code. Dit komt de zoekfunctie van het forum ten goede en geeft de helpers een inschatting of het wel of niet interessant is om er tijd aan te besteden. In het bestand zie ik nergens een? Er zijn dus geen vragen?

Edit: Even de gevonden code bekeken en dat kan veel eenvoudiger

Code:
Private Sub CommandButton2_Click()
  ar = Array([I4], [D4], [D5], [D6], [D8], [D9], [D10], [D11], [F11])
  Sheets("Blad2").Cells(Rows.Count, 1).End(xlUp).Offset(1).Resize(, 9) = ar
  Range("D4:D11, I4, F11").ClearContents
End Sub
 
Laatst bewerkt:
Jeetje VenA, dit is mega eenvoudig zo en ik begrijp het! Echt super bedankt.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan