Ga naar inhoud

leren programmeren


parkopino

Aanbevolen berichten

Quote

enig idee wat ik fout doe?

Ja, bij jou zal de naam van het blad niet Sheet1 zijn maar Blad1 .
Opdracht om een cijfer in een cel te plaatsen (een getal meteen in een cel invoeren gaat overigens sneller);

selecteer de gewenste cel en voer dan deze code uit.

Sub Getal_invoeren()
Dim Getal As Integer
Getal = InputBox("Welk getal?")
ActiveCell.Value = Getal
End Sub

 

Om van een willekeurig aantal cellen 1 cel te maken (dus niet alleen van a1, b1, a2, en b2),

selecteer de gewenste cellen en voer dan deze code uit:

Sub Cellen_samenvoegen()
Selection.MergeCells = True
End Sub


Om een achtergrondkleur te geven aan 1 of meer cellen,

selecteer eerst de betreffende cel(len) en voer dan deze code uit:

Sub Achtergrondkleur()
Dim Kleur As Integer
Kleur = InputBox("Welke kleur?" & Chr(13) & "kies een getal van 1 t/m 56")
Selection.Interior.ColorIndex = Kleur
End Sub


Om een vetgedrukte kader om een(groep) cel(len) te maken,

selecteer de gewenste cellen en voer dan deze code uit:

Sub Randen()
Selection.BorderAround Weight:=xlThick
End Sub


Om een diagonaal te plaatsen in een cel,

selecteer de gewenste cel(len) en voer dan deze code uit:

Sub Diagonaal()
Selection.Borders(xlDiagonalUp).Weight = xlThin
End Sub

 

Advies: als je nog weinig ervaring hebt met programmeren, gebruik dan de macro-recorder.

Dan bereik je (weliswaar met veel uitgebreidere code, maar dat is nieterg) hetzelfde resultaat.

aangepast door alpha
Link naar reactie
Delen op andere sites

49 minuten geleden, parkopino zei:

hoe centraliseer ik een cijfer in een cel en hoe bepaal ik de grote van een cijfer

hoe bepaal ik de grote van de cellen

Voer dat nu eens handmatig uit met de macrorecorder aan, zoals ik in mijn vorig bericht adviseerde,

dan heb je meteen het antwoord.

 

Link naar reactie
Delen op andere sites

×
×
  • Nieuwe aanmaken...

Belangrijke informatie

We hebben cookies geplaatst op je toestel om deze website voor jou beter te kunnen maken. Je kunt de cookie instellingen aanpassen, anders gaan we er van uit dat het goed is om verder te gaan.