Thema Datum  Von Nutzer Rating
Antwort
Rot Fehler beim Kompilieren
15.12.2012 15:00:53 Amras Tiwele
NotSolved
17.12.2012 09:46:12 schokobons
NotSolved
17.12.2012 11:11:43 Lutz
NotSolved

Ansicht des Beitrags:
Von:
Amras Tiwele
Datum:
15.12.2012 15:00:53
Views:
1889
Rating: Antwort:
  Ja
Thema:
Fehler beim Kompilieren

 


Hallo, ich wollte eine Userform erstellen 
wenn bei checkbox1 ein haken ist, soll die textdatei "hallo" bei der Textmarke "a" ( Die ich davor bestimm wo sie sitzt ) eingefügt werden. 
Gleichzeitig soll Textbox1 & Check2 gesperrt werden & danach sich dann Userform 2 öffnen. 

Oder ich gebe einen Text in Textbox 1 ein und durch anklicken von Check2 wird dieser Text dann auch bei der Textmarke "a" eingefügt. und danach ebenfalls userform2 geöffnet 

 

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
Private Sub CheckBox1_Click()
If CheckBox1.Value = True Then
Check2.Locked
TextBox1.Locked
Selection.InsertBreak Type:=wdPageBreak 
With ActiveDocument.Bookmarks       
.Add Range:=Selection.Range, Name:="a"
 .DefaultSorting = wdSortByName
 .ShowHidden = True 
End With 
Selection.GoTo What:=wdGoToBookmark, Name:="a"
 Selection.InsertFile FileName:="hallo.docx", Range:="", ConfirmConversions _ 
:=False, Link:=False, Attachment:=False 
Userform2.Show
End If       
End Sub
 
Private Sub Check2_Click()
Check2.Enabled = True
Check2.Locked = False
If Check2.Value = True Then
Selection.Copy What:=TextBox1.Text
Selection.GoTo What:=wdGoToBookmark, Name:="a"
Selection.Paste
Userform2.Show
End If
End Sub
 
Private Sub TextBox1_Change()
TextBox1.Enabled = True
TextBox1.Locked = False
 
End Sub
 
<span style="font-family: Verdana, Arial, Helvetica, sans-serif; line-height: 18px; background-color: rgb(239, 239, 239);">Wo ist hier mein Fehler bzw. habt ihr Verbesserungsvorschläge ?</span>

 

 

 

 


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
Rot Fehler beim Kompilieren
15.12.2012 15:00:53 Amras Tiwele
NotSolved
17.12.2012 09:46:12 schokobons
NotSolved
17.12.2012 11:11:43 Lutz
NotSolved