Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
684to688
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
684to688
684to688
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellwerte aus zweiter Arbeitsmappe lesen

Zellwerte aus zweiter Arbeitsmappe lesen
24.10.2005 14:33:38
Metin
Private Sub cmdEingabe_Click()
Dim Zellenanzahl As Integer
Dim Datensatzabfrage As Integer
Dim Zeile As Integer

Zeile = 5
Application.Workbooks.Open (txtpfadangabe)
Windows(Me.txtpfadangabe.Text).Activate
Zellenanzahl = ActiveSheet().Range("A5:A65536").SpecialCells(xlCellTypeConstants).Count
For Datensatzabfrage = 1 To Zellenanzahl
Windows(Me.txtpfadangabe.Text).Activate
Cells(Zeile, 1).Value = txtKabelnummer
Cells(Zeile, 2).Value = cboKabelart
Cells(Zeile, 3).Value = cboKabeltyp
Cells(Zeile, 5).Value = txtKabellänge
Windows("Messprotokollformular2").Activate
GoTo Kabelvergleich
nächster_Datensatz:

Zeile = Zeile + 1
Next Datensatzabfrage

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellwerte aus zweiter Arbeitsmappe lesen
26.10.2005 11:47:05
Unbekannter
So schreibst du die Werte aus den Cbo und Textboxen in die Zelle.
Cells(Zeile, 1).Value = txtKabelnummer
So ist's aber richtigrum
txtKabelnummer=Cells(Zeile, 1).Value
Gruß UN1
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige