Auteur Topic: Werkende macro's (gelezen 9209 keer)

RedHead · « **Reactie #15 Gepost op:** 19 maart 2007, 10:48:04 »

Erik, dat kan toch korter???

Code: [Selecteer]

Range("bureau").ClearContents

Groet, Leo

Erik Van Geit · « **Reactie #16 Gepost op:** 19 maart 2007, 11:00:52 »

Citaat van: RedHead op 19 maart 2007, 10:48:04

Erik, dat kan toch korter???
Code: [Selecteer]
Range("bureau").ClearContents

Groet, Leo

als je toch bezig bent, doe dan maar "delete"

Code: [Selecteer]

Range("bureau").Delete Insert:=xlToWifeter info: 'k heb nog wat aan mijn vorige post zitten veranderen

RedHead · « **Reactie #17 Gepost op:** 19 maart 2007, 11:09:07 »

Erik,

Citaat

'k heb nog wat aan mijn vorige post zitten veranderen

Dat zag ik

Toch ff een vraagje retour (prettig zo'n MVP bij het forum

). Het is toch NIET mogelijk om een andere cel perongeluk te dubbelklikken. Dat wordt toch afgevangen met je 1e regel (If Target.Row <> 1 Then Exit Sub)?

Groet, Leo

Erik Van Geit · « **Reactie #18 Gepost op:** 19 maart 2007, 11:31:49 »

ja, was ook mijn gedacht ...
om code te testen zit ik soms als een onnozele in het wilde weg te klikken: ineens was er een item "vet", heb ik dat nu gedroomd

mijn "kennis" zegt me ook dat het niet kan (even in mijn haar krabben)

NB: MrExcel MVP and MVP is niet hetzelfde

JeanPierre · « **Reactie #19 Gepost op:** 19 maart 2007, 14:10:04 »

Citaat van: Erik Van Geit op 19 maart 2007, 10:43:39

als je naar de eerste regel van de code kijkt, zie je 2 argumenten
Target As Range = waarin gedubbelklikt werd
Cancel As Boolean = de "eigenlijke" event verbonden aan de actie kan geannuleerd worden (voorbeeld: in deze code geraak je niet "in" de cel door dubbelklikken: test eens hoe vervelend het is, als je de cancel-lijn weglaat)

Erik, wat bedoel je met deze tekst? Als ik daar iets aan verander werkt het niet meer....

JP.

Erik Van Geit · « **Reactie #20 Gepost op:** 19 maart 2007, 20:15:34 »

Hoi, JP,

't Is NIET de bedoeling om die eerste SUBregel te wijzigen: je kan wel de argumenten Target & Cancel in de code gebruiken.

simpel voorbeeld

Code: [Selecteer]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Het geselecteerde bereik is " & Target.Address(0, 0), 64, "SELECTIE"
End Sub

het argument "target" is hier gebruikt (zoals ik ook al voorstelde in "onze" code)

Wat ik in vorige post zei is: als je de lijn

Code: [Selecteer]

Cancel = Trueweglaat, krijg je ... nou zie zelf maar het verschil...

Als je wat overweg kan met Engels, zijn volgende links nuttig voor meer info.
https://www.cpearson.com/excel/events.htm
https://www.tushar-mehta.com/excel/vba/vba-XL%20events.htm

ook interessante site is die van Jan Karel Pieterse
daar vind je onder andere wat uitleg om de "events" uit te schakelen
https://www.jkp-ads.com/Articles/NoEvents00NL.htm

NB: in je laatste bijlage staat te veel code: laat de herhalingen weg

beste groeten,
Erik

JeanPierre · « **Reactie #21 Gepost op:** 19 maart 2007, 20:59:46 »

Hey Erik,
Zover als ik weet is het nu dik in orde, het werkt prima, en het werkt zelfs bij mijn medeleden van onze dansgroep, dus iedereen tevreden zou ik zo zeggen.

Ik heb in alle geval de door u aangehaalde site's opgeslagen en zal daar zeker eens in neuzen.
Nogmaals iedereen die hier een steentje heeft bijgedragen, van harte bedankt.

Groetjes,
Jean-Pierre

Help!

Menu

Hulp bij posten

Zoeken

Recente topics

Auteur Topic: Werkende macro's (gelezen 9209 keer)

RedHead

Re: Werkende macro's

Erik Van Geit

Re: Werkende macro's

RedHead

Re: Werkende macro's

Erik Van Geit

Re: Werkende macro's

JeanPierre

Re: Werkende macro's

Erik Van Geit

Re: Werkende macro's

JeanPierre

Re: Werkende macro's