Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1104to1108
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Textboxinhalt aus anderer Exceldatei auslesen
Urmila
Hallo alle,
zwar weiß ich wie man in einer Zelle den Inhalt aus y-beliebigen Excel Datei eingeben kann, doch ich suche die Möglichkeit, den Inhalt von Zelle B1-B10 in den Textboxen TextBox1-TextBox10 anzeigen zu lassen. Die Datei, worin die Werte stehen, ist C:/Test/Versuch.xls.
Danke und LG
Urmila

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
ohne öffnen mit ExecuteExcel4Macro
05.10.2009 09:17:20
Tino
Hallo,
so könnte es gehen ohne die Datei zu öffnen.
Du musst im Code noch den Tabellennamen anpassen, im Beispiel ist es die Tabelle1.
..."'C:\Test\[Versuch.xls]Tabelle1'!R" & i & "C2"...
Dim i As Integer

'in einer Userform '********************************************************************** 
For i = 1 To 10
 Me("TextBox" & i) = ExecuteExcel4Macro("'C:\Test\[Versuch.xls]Tabelle1'!R" & i & "C2")
Next i

'Auf einer Tabelle '********************************************************************** 
For i = 1 To 10
    Tabelle1.Shapes("TextBox" & i).DrawingObject.Object.Value = _
    ExecuteExcel4Macro("'C:\Test\[Versuch.xls]Tabelle1'!R" & i & "C2")
Next i
Oder Du machst Dir in Hilfszellen eine Formel die Dir die Daten aus der Datei liest und
füllst die Textboxen aus diesen Zellen.
Gruß Tino
Anzeige
AW: Textboxinhalt aus anderer Exceldatei auslesen
05.10.2009 09:24:33
JogyB
Hi.
Private Sub UserForm_Initialize()
Const Pfad = "c:\Test\"
Const daTei = "Versuch.xls"
Const taBelle = "Tabelle1"
Const spAlte = 2
Dim zeiLe As Long
For zeiLe = 1 To 10
Me.Controls("TextBox" & zeiLe) = _
ExecuteExcel4Macro("'" & Pfad & "[" & daTei & "]" & _
taBelle & "'!" & "R" & zeiLe & "C" & spAlte)
Next
End Sub
Gruss, Jogy
Perfekt, danke euch beiden....
05.10.2009 09:36:37
Urmila
LG
Urmila

342 Forumthreads zu ähnlichen Themen


Hallo liebes Forum,
gibt es eine Möglichkeit aus einer Zelle nur die Zahlen auszulesen, siehe Beispiel:
'123456 BLA --> 123456
Ist eine Excel-interne (keine VBA-Programmierung) hier möglich?
Vielen Dank für die Unterstützung!
Timo
Anzeige

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
Anzeige

Ich habe in einer EXCEL-Anwendung mehrere Grafiken mit eingefügten Textfeldern. Die Inhalte der Textfelder wurden bisher manuell erfasst. Besteht eine Möglichkeit, die Textfelder mit den Inhalten von Zellen aus der EXCEL-Anwendung zu verknüpfen? Mein Wunsch ist, in Zukunft bei Aktualisierung de...

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...

Hallo,
wie kann ich herausfinden ob ein Text in einer Variable enthalten ist?
Beispiel: If variable = *text* Then xxxxx
oder If *text* IsIn variable Then xxxx
Grüße
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige