Noob met VBA

[Verwijderd]

Ik moet voor school een opdracht maken in vba.
Maar aangezien ik hier een noob in ben kom ik er niet uit.

Kunnen jullie mij helpen?

De opdracht:

1. Open een nieuw document en geef dit de naam opdr3-1.doc
2. Maak nu een programma dat de opmaak aanpast van de regel waar de cursor in staat.

- Zorg ervoor dat de gebruiker gevraagd wordt om een code in te voeren.
- Aan de hand van de code wordt de opmaak bepaald en toegepast.

Code:
V= Maak regel vet
I= Maak regel cursief
U= Maak regel onderstreept


Wat heb ik zelf al geprobeert?

Ik ben nu al twee dagen bezig geweest van alles geprobeert ik ben tot nu toe dit voor elkaar gekregen:

Sub Test()

' Test Macro

Code = InputBox("type de code in: ")
If Code <> Empty Then
Code = ""
Selection.WholeStory
If Code = i Then Selection.Font.Italic = wdToggle
If Code = u Then Selection.Font.Underline = wdUnderlineSingle
If Code = v Then Selection.Font.Bold = wdToggle
End If
End Sub

Dit gaf als resultaat als ik V,I of U indruk alles wordt toegepast.
Waar zit de lompe fout?

[ Voor 9% gewijzigd door Verwijderd op 16-03-2006 17:46 ]

[matthijsln]

Zet Option Explicit maar eens aan.

[NMe]

En nu kunnen wij jouw huiswerk gaan maken? Daar beginnen we niet aan hoor.

Sowieso staat je topic in het foute subforum (zie Waar hoort mijn topic?), en daarnaast houden we er niet van als mensen clones gaan aanmaken. Je oude account lijkt me nog prima te voldoen?

Je kan best een nieuw topic openen in Officesuites en -software als je er echt niet uitkomt, maar doe dat dan wel met je andere account en met een beetje meer eigen inzet. Ik lees hier niet veel meer dan "dit is mijn vraag, dit is mijn dappere poging, los het maar op", en dat is dus niet te bedoeling. Lees dus in Officesuites en -software eerst het beleidstopic door!