Clever-Excel-Forum - Inhalt von Listbox in Userform ausdrucken

Seiten: 1 2 3 4 5 6 7 8

OK.....Bilder hab ich hinbekommen...nur Text nicht.

ich mach auch jetzt schluss

Hier der letzte Stand der Mappe, in der ich nur die Bilder eingefügt...hier geht es nur, wenn Ich textbox2 und textbox14 angebe........
Text in Listbox3 geht noch nicht.

[attachment=14741]

so sieht der komplette Code aus:

Code:
Private Sub Foto_einfuegen()

   Dim xFn As Long

   Dim strDatei As String

   Dim xText As String

   Dim strPath As String

   strPath = "D:\AdressBuchDaten\" 'Pfad anpassen <-- auf schreibweise und Backslash achten

   ListBox3.Clear

   xFn = FreeFile

   strDatei = txtVorname.Text & " " & txtName.Text

   With AdressBook

       .Image1.Picture = Nothing

       On Error Resume Next

          .Image1.Picture = LoadPicture(strPath & TextBox2.Text & " " & TextBox14.Text & ".jpg")

       If Dir(strPath & strDatei & ".txt") <> "" Then

           Open strPath & strDatei & ".txt" For Input As xFn

           Do While Not EOF(1)

               Line Input #xFn, xText

               ListBox3.AddItem xText

           Loop

           Close xFn

       End If

       On Error GoTo 0

   End With

End Sub

Da bin ich wieder überfragt...woran es liegt ? :(

Hallo Michael,

setze dir einen Haltepunkt bei Line Input und schaue was xText enthält.

moin

ich würde jetzt eher mal darauf tippen,
da sich die TextBoxen auf unterschiedlichen Multipages befinden,
dass die TextBoxen txtVorname und txtName leer sind

MfG Tom

Guten Morgen Crazy Tom und Steffl,

Also es gibt ja in meiner Mappe einmal die Page0 "Hauptmenü" in der ich die Daten per Spinbutton hin und her anzeigen lassen kann.

Dort steht die TextBox2 für "Vorname" und die Textbox14 für "Name"

In der Page1 will ich ja neue Kontakte eingeben können.

dort ist die TextBox mit "txtVorname" und TextBox mit "txtName" bezeichnet.

In der Page 0 wird im Moment zu dem Namen nur die Bilder angezeigt, wenn ich im Code für die Page die TextBox2 und Textbox14 dort angebe.
In der Page müsste auch der passende Text unter Info Page geladen , das bleibt leer.

Ich finde selber jetzt nicht den Fehler?

Müsste ich jetzt die beiden Pages, die jeweiligen TextBoxen gleich benennen?
Also auf beiden Pages "txtVorname" und "txtName", oder würde es da Konflikte geben?

Gruß

MdeJong

nein Steuerelemente dürfen nicht gleich benamt werden
funktioniert es denn einzeln?
auf der einen Page das Bild?
und auf der anderen Page der Text wenn du dort die TextBoxen separat ausfüllst?
darum meine Frage ob die TextBoxen für den Text leer sind wenn du das Bild lädst

Ok....dann weiß ich ja für später, das alle TextBoxen einen eigenen Namen bekommen...für mich besser zur Übersicht-

Also wenn ich auf der Page bin, wo das Bild angezeigt wird.....das ist ja das mit dem SpinButton....durch den Spin fülle ich ja auch alle TextBoxen und
dazu kommt das passende Bild.

Ich kann jetzt hier selber auf der Arbeit die Datei auch nicht ausprobieren.

und da ist eben jetzt die Frage ob die txtVorname und txtName auch mit dem Spin befüllt werden
wenn nicht dann sind die TextBoxen leer und dann bekommste keinen Text angezeigt

Hallo Tom,

ich glaub, das habe ich beantwortet?

Die TextBoxen wen bei Benutzung der Spinbutton gefüllt.

Ich Kann die Datei hier auf der Arbeit nicht ausprobieren...sobald ich auf dem Spin klicke, stürzt Excel ab

Seiten: 1 2 3 4 5 6 7 8