Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Excel und VB6
Autor: Holzinger
Datum: 04.04.05 19:34
Hallo! Habe ein Problem, beim programmieren von VB6 mit ExcelXP. Ich möchte einen Text von einer Textbox im VB in eine Zelle ins Excel kopieren, und einen Text von einer Zelle ins VB kopieren. Diesen Code habe ich schon vom Forum, aber ich weiß nicht wie ich den Wert für die "Zeile" und die "Spalte" definieren kann, und zwar im CommandButton. Der Befehl läuft bis jetzt nur dann ab, wenn ich statt Spalte bzw. Zeile eine Zahl eingebe. Ich hoffe es gibt eine einfache Lösung, da ich schon verzweifle!! Bitte um Hilfeeeeeee!!!!! Code: Option Explicit Private oExl As New Excel.Application Dim A As Variant Dim Zeile As Long, Spalte As Integer Private Sub OpenExlWS(ByVal sWSName As String, ByVal sTabName As String) 'Workbook öffnen On Error Resume Next oExl.WorkBooks.OpenXML sWSName If Err > 0 Then MsgBox "Exceldatei konnte nicht gefunden oder geöffnet werden.blabla", vbExclamation, "Dateifehlerhaha" Exit Sub End If On Error GoTo 0 'Tabelle selektieren ActiveWorkbook.Sheets(sTabName).Select 'Zelle lesen A = ActiveSheet.Cells(Zeile, Spalte).Value 'Zelle schreiben ActiveSheet.Cells(Zeile, Spalte).Value = "edgfsdfhfd" 'alles schließen ActiveWorkbook.Close SaveChanges:=True oExl.Quit Set oExl = Nothing End Sub Private Sub Command1_Click() OpenExlWS App.Path & "\test.xls", "Tabelle2" End Sub Stephan Holzinger

Excel und VB6	659	Holzinger	04.04.05 19:34
Re: Excel und VB6	408	Lord Of Trance	04.04.05 20:57
Re: Excel und VB6	380	Holzinger	05.04.05 07:48

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen