Thema Datum  Von Nutzer Rating
Antwort
09.10.2014 12:32:59 Hans Dieudonne
NotSolved
Blau Nach Klick Eingebe und nach Abfrage Übernahme
 12.10.2014 22:02:32 Gast96541
NotSolved

Ansicht des Beitrags:
Von:
Gast96541		 Datum:
12.10.2014 22:02:32		 Views:
1155		 Rating:
     
Antwort:
  Ja
Thema:
Nach Klick Eingebe und nach Abfrage Übernahme

Folgende Voraussetzungen sind zu beachten:
Erstellung einer UserForm1 mit TextBox1, einem Button1 und einem Beschriftungsfeld Label1
Das Label1 ist auf Visible=False festgelegt.

Durch Doppel-Klick auf die erste Spalte der Excel-Tabelle1 wird folgendes Programm ausgeführt:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    Dim zeile As Integer
    Dim spalte As Integer
    zeile = Target.Row
    spalte = Target.Column
    If (spalte = 1) Then
        UserForm1.Label1.Caption = zeile
        UserForm1.Show
    End If
End Sub

die entsprechende Zeilen-Nr wurde dem unsichtbaren Label1 übergeben.
In die UserForm1.TextBox1 wird die Zahl oder der Text eingegeben
und durch den UserForm1.Button1 wird der TextBox1.Value Inhalt
in die entsprechende Zeile mit der Spalten-Nr. 4 übergeben.
siehe nachfolgende Programmzeilen.

Private Sub CommandButton1_Click()
    Dim zeile As Integer
    zeile = UserForm1.Label1.Caption
    ThisWorkbook.Sheets("Tabelle1").Select
    Sheets("Tabelle1").Cells(zeile, 4).Value = UserForm1.TextBox1.Value
    Unload Me
End Sub

Vielleicht dient dies als nützliche Anregung.

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
09.10.2014 12:32:59 Hans Dieudonne
NotSolved
Blau Nach Klick Eingebe und nach Abfrage Übernahme
 12.10.2014 22:02:32 Gast96541
NotSolved