0
Fortryd
Stemmer
Er der en særlig grund til, at mellemrum ikke automatisk erstattes med understregninger, når du vælger tekst i et Word-dokument og derefter klikker på ikonet Indsæt bogmærke under fanen Kutools? Dette virker som en helt logisk, tidsbesparende funktion, som Kutools kan og bør implementere omgående. Jeg ville have forventet en sådan funktion, når jeg købte softwaren, og glæder mig over andres kommentarer og/eller tanker om det samme.
Hej laxerlager,
Jeg har samme problem/ærgrelse. Så i stedet for at bruge Kutools til at oprette bogmærket, bruger jeg følgende makro. Det ville gøre mig meget glad, hvis en anden end kunne få gavn af mit arbejde!
Ved du, hvordan man bruger makroer?
Jeg har samme problem/ærgrelse. Så i stedet for at bruge Kutools til at oprette bogmærket, bruger jeg følgende makro. Det ville gøre mig meget glad, hvis en anden end kunne få gavn af mit arbejde!
Ved du, hvordan man bruger makroer?
Sub InsertNewBookmark()
Dim MyData As DataObject
Dim strClip As String
Dim bkName As String
If Selection.Type = wdSelectionNormal Then
Selection.Copy
End If
Set MyData = New DataObject
MyData.GetFromClipboard
strClip = MyData.GetText
strClip = Trim(strClip)
strClip = Replace(strClip, " ", " ")
strClip = Replace(strClip, " ", " ")
strClip = Replace(strClip, " ", "_")
bkName = InputBox("Insert new bookmark name.", "Hello there.", strClip)
On Error GoTo Oops
If (StrPtr(bkName) = 0) Then
' MsgBox "You pressed cancel or [X]."
Exit Sub
ElseIf (bkName = "") Then
MsgBox "You have to name the bookmark. Try again."
Call InsertNewBookmark
Else
ActiveDocument.Bookmarks.Add _
Name:=bkName, Range:=Selection.Range
Exit Sub
End If
Oops:
MsgBox ("The bookmark could not be created. Remember to follow these guidelines :" & vbNewLine & vbNewLine & "• Names must begin with a letter of the alphabet." _
& vbNewLine & "• Names can contain only letters, numbers, and the underscore." & vbNewLine & "• Names cannot contain spaces or punctuation marks." & vbNewLine _
& vbNewLine & "Let's try it again. Ready?")
Call InsertNewBookmark
End Sub
0
Fortryd
Stemmer
Hej med dig.
Troede jeg aldrig ville få et svar, endsige et med en makro! Tusind tak.
Desværre virker makroen ikke for mig. Når jeg vælger tekst og kører makroen, får jeg hele tiden en VBA-fejl "Kan ikke udføre kode i pausetilstand".
Nogle tanker eller rettelser?
Tak igen!
Troede jeg aldrig ville få et svar, endsige et med en makro! Tusind tak.
Desværre virker makroen ikke for mig. Når jeg vælger tekst og kører makroen, får jeg hele tiden en VBA-fejl "Kan ikke udføre kode i pausetilstand".
Nogle tanker eller rettelser?
Tak igen!
0
Fortryd
Stemmer
glemte at nævne, at jeg også nogle gange får fejlen "Kompileringsfejl: Brugerdefineret type ikke defineret"
Du skal blot tilføje den rigtige reference. Det er ikke nødvendigt at forstå præcis, hvad det er, bare gør følgende:
- Gå til VBA-editoren (det vil sige, tryk ALT+F11)[/*]Opret en tom brugerformular (se vedhæftet skærmbillede. Du højreklikker i venstre rude, vælger indsæt og derefter brugerformular.) [/*]Klik på Værktøjer på menulinjen[/*]Klik på Referencer[/*]Rul ned til Microsoft Forms 2.0 Objektbibliotek[/*]Sørg for, at boksen er markeret[/*]Klik OK[/*]
- Side:
- 1
Der er endnu ingen svar på dette indlæg.