Thema Datum  Von Nutzer Rating
Antwort
Rot Zeile anklicken aus welcher die Daten übernommen werden sollen
25.06.2014 15:08:12 Andrea
Solved
25.06.2014 16:02:48 Andrea
Solved

Ansicht des Beitrags:
Von:
Andrea
Datum:
25.06.2014 15:08:12
Views:
2124
Rating: Antwort:
 Nein
Thema:
Zeile anklicken aus welcher die Daten übernommen werden sollen

Hi Leute!
 

Ich habe folgendes Problem. Und zwar habe ich ein Makro geschrieben, welches automatisch ein Wordtemplate befüllt. Die Informationen zum befüllen nimmt das Makro aktuell aus der letzten Zeile im UsedRange. Nun möchte ich aber, dass man sich selber die Zeile aussuchen kann.

Gibt es die Möglichkeit, dass ich ein Fenster mit der Aufforderung eine Zeile anzuklicken aufrufen kann und durch den Klick quasi die Zeile dann entnommen wird?

Hier ein Teil meines Codes

 

Danke euch :)
 

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
Private Sub word_PTN_Click()
 
    Dim objword As Object
    Dim Retour As Worksheet
    Dim Path As String
 
 
Set Retour = ActiveWorkbook.Sheets(1)
Set objword = CreateObject("Word.Application")
 
With Retour
 
lastRow = Cells(Retour.Rows.Count, 2).End(xlUp).Row
 
Set Customer = Cells(lastRow, 2)
End With
 
With objword
.Visible = True
 
.Documents.Open "H:\Andrea\Test.docx"
 
.ActiveDocument.Bookmarks("Text1").Select
.Selection.Text = Customer
 
End With
 
End Sub

 


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 Zeile anklicken aus welcher die Daten übernommen werden sollen
25.06.2014 15:08:12 Andrea
Solved
25.06.2014 16:02:48 Andrea
Solved