Thema Datum  Von Nutzer Rating
Antwort
30.04.2016 22:41:00 Hofe
NotSolved
01.05.2016 15:03:21 Gast73473
NotSolved
01.05.2016 15:28:46 Hofe
NotSolved
01.05.2016 17:29:30 Gast83074
NotSolved
01.05.2016 19:32:40 Hofe
NotSolved
01.05.2016 19:37:07 Hofe
NotSolved
01.05.2016 19:48:56 Gast54756
NotSolved
01.05.2016 20:07:28 Hofe
NotSolved
01.05.2016 20:08:17 Hofe
NotSolved
01.05.2016 20:16:47 Gast43310
NotSolved
01.05.2016 20:38:47 Hofe
NotSolved
01.05.2016 21:08:09 Gast36395
NotSolved
01.05.2016 21:08:20 Gast27765
NotSolved
01.05.2016 21:08:29 Gast16413
NotSolved
01.05.2016 21:14:24 Gast26480
NotSolved
01.05.2016 21:31:16 Hofe
Solved
01.05.2016 21:39:35 Gast28033
NotSolved
01.05.2016 21:45:28 Hofe
Solved
01.05.2016 21:58:21 Gast83673
NotSolved
Blau Textmarke nach füllen wieder neu setzen
02.05.2016 15:57:14 Hofe
Solved
02.05.2016 18:58:27 Gast65100
NotSolved
03.05.2016 07:29:00 Hofe
Solved
03.05.2016 12:26:17 Gast34319
Solved

Ansicht des Beitrags:
Von:
Hofe
Datum:
02.05.2016 15:57:14
Views:
912
Rating: Antwort:
 Nein
Thema:
Textmarke nach füllen wieder neu setzen

jetzt muss ich mich doch noch mal an den vba guru für textmarken wenden xD

in meiner userform habe ich eine checkbox, die wenn aktiv dieses scipt hier auführt

Sub GrafikEinfügen()
Dim intChoice As Integer
Dim strPath As String

'only allow the user to select one file
Application.FileDialog(msoFileDialogOpen).AllowMultiSelect = False
'make the file dialog visible to the user
intChoice = Application.FileDialog(msoFileDialogOpen).Show
'determine what choice the user made
If intChoice <> 0 Then
    'get the file path selected by the user
    strPath = Application.FileDialog( _
        msoFileDialogOpen).SelectedItems(1)
End If
'move the cursor to the bookmark
Selection.GoTo What:=wdGoToBookmark, Name:="TM_Unterschrift"
'insert the image
Selection.InlineShapes.AddPicture FileName:= _
    strPath, LinkToFile:=False, _
    SaveWithDocument:=True
End Sub

wo eine Textmarke (in dem Fall "TM_Unterschrift") gesucht wird und dann davor ein Grafik angehangen wird, die man selber raussucht.

ist es möglich, den schrit von der textmarke auch wieder rückwerts zu gehen?

so das ich über AutoOpen

immer wieder das Bild löschen, sofern es vorhanden ist?

 

 

 

 


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
30.04.2016 22:41:00 Hofe
NotSolved
01.05.2016 15:03:21 Gast73473
NotSolved
01.05.2016 15:28:46 Hofe
NotSolved
01.05.2016 17:29:30 Gast83074
NotSolved
01.05.2016 19:32:40 Hofe
NotSolved
01.05.2016 19:37:07 Hofe
NotSolved
01.05.2016 19:48:56 Gast54756
NotSolved
01.05.2016 20:07:28 Hofe
NotSolved
01.05.2016 20:08:17 Hofe
NotSolved
01.05.2016 20:16:47 Gast43310
NotSolved
01.05.2016 20:38:47 Hofe
NotSolved
01.05.2016 21:08:09 Gast36395
NotSolved
01.05.2016 21:08:20 Gast27765
NotSolved
01.05.2016 21:08:29 Gast16413
NotSolved
01.05.2016 21:14:24 Gast26480
NotSolved
01.05.2016 21:31:16 Hofe
Solved
01.05.2016 21:39:35 Gast28033
NotSolved
01.05.2016 21:45:28 Hofe
Solved
01.05.2016 21:58:21 Gast83673
NotSolved
Blau Textmarke nach füllen wieder neu setzen
02.05.2016 15:57:14 Hofe
Solved
02.05.2016 18:58:27 Gast65100
NotSolved
03.05.2016 07:29:00 Hofe
Solved
03.05.2016 12:26:17 Gast34319
Solved