Goedemorgen,
Ik ben op zoek naar een oplossing voor het volgende:
Ik heb een "master blad" die gevuld word met data.
Blad 2 is een blad waaruit verkorte info in staat afkomstig uit het master blad.
Dit doe ik gewoon simpel met een verwijzing =masterblad!A1 etc
op het master blad word in een kolom een getal ingevuld handmatig als deze leeg blijft zou ik op blad2 willen dat deze regel verborgen word of zelfs verwijderd in dat blad.
Ik dacht te begrijpen dat vba niet met die formule om kon gaan maar een harde waarde moest zijn.
Ik dacht dus aan knippen en plakken.
Dus kwam ik tot deze code:
Dit werkt verder prima
voor het verbergen van de waarde 0 heb ik dit:
[/B]Deze alleen werkt ook
Er zijn 2 afdeling die met dit blad gaan werken.
Blad 1 is voor afdeling 1.
Blad 2 voor afdeling 2.
Als afdeling 1 zijn gegevens heeft verwerkt is het de bedoeling wanneer afdeling 2 het blad openend zijg gegevens ingevuld opgeschoond zijn op blad2.
Alleen nu wil ik graag deze 2 combineren echter lukt me dat niet.
De codes hierboven heb ik niet zelf bedacht maar gezocht op internet.
Ik heb zelf totaal geen verstand van vba.
Kunnen jullie mij helpen met dit onderwerp wellicht kan het heel simpel alleen zie ik door de bomen het bos niet meer..
Ik hoop dat ik het goed heb kunnen omschrijven wat mijn wensen zijn.
Met vriendelijke groet,
Bennie
Ik ben op zoek naar een oplossing voor het volgende:
Ik heb een "master blad" die gevuld word met data.
Blad 2 is een blad waaruit verkorte info in staat afkomstig uit het master blad.
Dit doe ik gewoon simpel met een verwijzing =masterblad!A1 etc
op het master blad word in een kolom een getal ingevuld handmatig als deze leeg blijft zou ik op blad2 willen dat deze regel verborgen word of zelfs verwijderd in dat blad.
Ik dacht te begrijpen dat vba niet met die formule om kon gaan maar een harde waarde moest zijn.
Ik dacht dus aan knippen en plakken.
Dus kwam ik tot deze code:
Code:
[B]Sub kopieerTest()
Sheets(1).Range("k3:k999999").Copy
Sheets(2).Range("e3:e999999").PasteSpecial xlPasteValues
Application.CutCopyMode = False[/B]
Dit werkt verder prima
voor het verbergen van de waarde 0 heb ik dit:
Code:
[B]If Target.Column = 5 Then Target.EntireRow.Hidden = Target.Value = 0
[/B]Deze alleen werkt ook
Er zijn 2 afdeling die met dit blad gaan werken.
Blad 1 is voor afdeling 1.
Blad 2 voor afdeling 2.
Als afdeling 1 zijn gegevens heeft verwerkt is het de bedoeling wanneer afdeling 2 het blad openend zijg gegevens ingevuld opgeschoond zijn op blad2.
Alleen nu wil ik graag deze 2 combineren echter lukt me dat niet.
De codes hierboven heb ik niet zelf bedacht maar gezocht op internet.
Ik heb zelf totaal geen verstand van vba.
Kunnen jullie mij helpen met dit onderwerp wellicht kan het heel simpel alleen zie ik door de bomen het bos niet meer..
Ik hoop dat ik het goed heb kunnen omschrijven wat mijn wensen zijn.
Met vriendelijke groet,
Bennie
Bijlagen
Laatst bewerkt: