Gebruik Worksheet_Activate() en plaats deze onder het blad waar code geactiveerd moet worden.
Klein voorbeeldje:

Private Sub Worksheet_Activate()
Range("A1") = "test"
End Sub
Door deze onder...

Welke adressen je wilt gebruiken bepaal je zelf.
Maak in Word een samenvoegbestand waarbij je de adressen inleest vanuit Excel.
Staat in de help van Word vrij goed beschreven.

Kopiëren, plakken en vervolgens sorteren van Z-->A lijkt mij de snelste methode.

Nog even een wat late reactie, maar deze kwam ik vanmorgen nog tegen.
Dit probleem was bekend bij microsoft en is met servicepack 1 voor office 2007 opgelost.
De oplossing is een onderdeel van...

:):)


Waarom controleren op datum en weekdag als controle op even of oneven datum voldoende is.
Plaats de volgende formule onder de voorwaardelijke opmaak:
=REST(DAG(D$6);2)=0
Bij de even...

Bijgaand 1 voorbeeldje, met de figuren in tabblad3,.
Credits niet voor mij, ik heb ze van internet gehaald.
Beide komen van Luc Heyndrickx, wel bekend op Helpmij.
Bezoek zijn site eens voor meer...

Bestanden rechtstreeks vanuit een mailprogramma openen geeft regelmatig (onverklaarbare) problemen. Daarom adviseer ik iedereen altijd om de bestanden eerst op te slaan en ze pas daarna vanuit het...

als het een of enkele kolom(men) betreft zou je het volgende kunnen doen:
(Als voorbeeld kolom A en B van blad1)
Maak een extra tabblad aan.
vul in A1 in =HOOFDLETTERS(blad1!a1)
Trek deze met de...

Indien de lengte van het "nummer" niet altijd gelijk is dan kun je ook de volgende formule gebruiken in B1:


=DEEL(A1;LENGTE(A1)-4;4)*1

Ik heb ook wat minder ervaring in VBa Word :D maar als het op sommige andere pc's wel werkt vermoed ik dat er verschil is in de Word installatie.
Draait men onder dezelfde versie?
Controleer of op...

Orginele word?

en dank je om de oplossing met ons te delen.
Daar is het forum tenslotte ook voor bedoeld.:thumb:

Je vraagt de inhoud van Activecell.Comment.Text op, maar bestaat Activecell.Comment wel?

Check daar eerst op.

De titel is if then else.
Waar is je else?

Deze werkt wel maar kan korter.


If Sheets("invoer mengopdracht").Range("m44").Value = 0 Or _
Sheets("invoer mengopdracht").Range("m44").Value...

Eentje die ik hier nog niet genoemd zie:

Selecteer gehele werkblad.
Klik rechts en kies celeigenschappen.
Kies tabblad randen.
Staat kleur hier op automatisch?

Kies anders eens een kleur en...

Heb je de zoekfunctie van het forum al gebruikt? Vraag komt regelmatig terug.
Kijk ook eens op de site van Ron de Bruin.

Kijk eens op deze link. In die bijlage (te downloaden na registratie) staat veel info en voorbeeld over userform.

Voorbeeldje voor vloeien zoomen:


Sub zoom()
a = ActiveWindow.zoom
For i = a To 150
ActiveWindow.zoom = i
Next
MsgBox ("Zoom is nu " & i)
For i = 150 To a Step -1

Met deze macro worden de cijfers in de 1e kolom rechts en de letters (en leestekens etc) in de 2e kolom rechts van je gegevens geplaatst. Plaats de cursor in de cel met het eerste te splitsen gegeven...

Je wilt een weeknummer opgeven, maar in je kolommen staan datums. Hier moeten dus de weeknummers nog van berekenen.
Moeten de gegevens uit de hyperlink ook getoond worden?
Kun je een voorbeeldje...

Kun je het bestand hier plaatsen?
Of eventueel de volledige macrocode.

een plaatje is geen excelbestand.:(
Gezien de complexiteit van stellen van de vraag en koppeling met koersen op de beurs :confused: haak ik in elk geval af.

Ik kan in het bestand niets geks ontdekken.
Bij mij komt alles netjes in cm.

Als de optie van HSV niet werkt zou je eventueel via de office-CD Excel kunnen repareren op opnieuw kunnen...

Kun je hier een bestandje plaatsen met een plaatje erin?

Een beknopt voorbeeldje dat gebruik maakt van inputboxen.


Sub vragen()

Range("a1").Value = InputBox("Hoe oud bent u? ", "Leeftijd vragen")
Gehuwd:
Range("b1").Value = InputBox("Bent u...