Deel kolom automatisch kopieren naar ander blad

[try1]

Hallo,

Ik wil graag het volgende voor elkaar krijgen
ik voer in exel2010 in blad1 kolom B vanaf regel B11 gegevens in tot B140 soms meer soms minder

Blad 2 is wil ik deze gegevens ook hebben maar dan in kolom B vanaf 30 tot B160 ,maar omdat dit een formulier is wat soms kleiner uitpakt
wil ik geen cellen reserveren zodat ik grote lege vakken krijg
er moet dus automatisch gekopieerd worden.
Ben na een paar uur zoeken beetje het pad kwijt

hoop dat er iemand is die mij kan helpen

 

[VenA]

Plaats even het bestandje waar je mee bezig bent.

 

[HSV]

Sub hsv()
Dim sn
With Sheets("blad1")
  sn = .Range(.Cells(11, 2), .Cells(11, 2).End(xlDown))
 With Sheets("blad2")
  .Range(.Cells(30, 2), .Cells(30, 2).End(xlDown)).ClearContents
  .Cells(30, 2).Resize(UBound(sn)) = sn
 End With
End With
End Sub

En dan mag je zelf weten of je de code in een event plaatst (bv. de sheets_Activate).

 

[try1]

tnx heren ,

Ik ga de code gebruiken
nu nog uitzoeken wat bedoeld wordt met
code in een event plaatst (bv. de sheets_Activate).
keuzes altijd lastig

 

[try1]

Helaas
ik doe iets niet goed
het werkt nl niet
er gebeurd helemaal niets

 

[HSV]

Voer je de code handmatig uit, of via de activate_event?

 

[try1]

begrijp ik niet helemaal ...
knip en plak in code veld als dat de vraag beantwoord ?

ben een beetje onhandig onervaren met code's (scripts)
weet zeker dat het iets is wat ik niet goed doe
kijk er mogen ochtend wel even verder naar dan is het rustig hier

tnx )

 

[VenA]

Als je even had gedaan wat in #2 staat dan was het probleem, denk ik, al opgelost geweest.

 

[try1]

Zal ik het toch eerst moeten uploaden
en als dat niet lukt
wordt het een beetje lastig

 

[VenA]

Zo heel moeilijk is dat niet. Klik op Ga geavanceerd en vervolgens op de paperclip.
De code van HSV heb ik een beetje aangepast voor het geval er lege cellen in het bereik staan. De code wordt uitgevoerd als je op 'Start' klikt. Of als je op 'Blad2' klikt.

 

[HSV]

Iets robuuster mocht er boven cel B11 van blad1 en boven B30 van blad2 iets staan wat niet moet verdwijnen.

 

[try1]

@ vena

Het paperclipje had ik idd gevonden kom in een menu van eerder verzonden stukken
awel dat kan niet ,nl nog nooit iets verstuurd.
maar cursus 12 exel op (you troep) gaf verheldering )

text groen in het code blad blijkt de naam te zijn en de text in zwart de code
andersom werkt het niet, zelfs bij mij niet.
het werkt dus nu wel alleen in blad2 als de regel er bij komt moet er onder ook nog een lege regel onder komen
die moet geactiveerd worden als ik in kolom B blad1 een volgende cel activeer
nl op blad2 nog een regel verder naar onderen staat ook weer iets,

Dank voor de nieuwe tips ik ga ze zeker uitproberen wie weet wat ik verder nog voor dingen tegenkom
Super bedankt )

 

[VenA]

Ik zie geen voorbeeldje. Of is de vraag opgelost? Als dat zo is wil je de vraag dan op opgelost zetten? Anders graag een nieuwe poging om het bestandje bij te voegen.

 

[try1]

klopt omdat ik zoals ik al eerder zij
ik geen upload kan doen
vraag is deels beantwoord
wil het met alle plezier op afgehandeld zetten
maar waar is het knopje ?

 

[VenA]

Misschien is het handig dat je dit linkje even doorneemt. http://www.helpmij.nl/forum/showthread.php/610881

 

[plongske]

Het paperclipje had ik idd gevonden

Dan kom je inderdaad in een manager scherm waar je eventueel alle bijlagen vind die je reeds hebt geplaatst (waarschijnlijk is deze bij u leeg).
Maar je vind er ook bovenaan een knop toevoegen. Als je daar op klikt krijg je een knop bladeren. Zoek dan het bestand dat je wenst te uploaden op uw computer.
Als je het bestand hebt gevonden druk dan op openen.
Druk dan op uploaden. als het bestandje verschijnt onderaan bij bijlagen druk dan op gereed.
Druk dan op reactie plaatsen.