anoniem Geplaatst: 2 mei 2002 Delen Geplaatst: 2 mei 2002 Goedendag, Kan ik door middel van een macro automatisch tekst in een tekstveld zetten, dus waar de cursor knippert daar moet de tekst komen. Zou dit door middel van een keuzemenu kunnen? Wie kan mij hiermee helpen? Mvg Bas Quote Link naar reactie
anoniem Geplaatst: 2 mei 2002 Auteur Delen Geplaatst: 2 mei 2002 Dit heb ik tot nu toe, maar hij zet de tekst automatisch bovenaan maar als daar al tekst staat dan moet hij dat niet doen, dus waar de cursor komt te staan moet de tekst ook staan. Sub Button2_Click() ActiveSheet.Shapes("Text Box 1").Select Selection.Characters.Text = _ "U wordt hierbij geregistreerd." & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" & Chr(10) & "" With Selection.Characters(Start:=1, Length:=68).Font .Name = "Arial" .FontStyle = "Regular" .Size = 10 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With Range("C4").Select Wie kan me hierbij helpen??? Quote Link naar reactie
Aanbevolen berichten
Om een reactie te plaatsen, moet je eerst inloggen