In Excelbestimmte Zellen per klick in ein anderes Tabellenblatt in bestimmte Zellen einfügen

Question

Hallo,

Ich habe folgendes Problem und bin auch in VBA nicht gerade bewandert.....

Ich will aus Tabelle 1  Spalte B6 C6 D6 in Tabelle 2 auf G11(B6) C6(C5) E5(D6) per klick übertragen es ist Text

dies will ich auf Tabelle 1  in den Spalten B C D fortlaufend nach unten wiederholen aber das immer in Tabelle 2 die gleichen Zellen gefüllt werden.

Sprich Tabelle 1 ist eine Liste und Tabelle 2 ein Protokoll was per Click vor gefüllt werden soll.

ICh danke für Hilfe

Answer 1

Hallo Community

z.b. DoubleClick

Einzufügen

Alt+F11/Projektexplorer/Tabelle1

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 Select Case Target
  Case Range("A1")
   Worksheets("Tabelle2").Range("A1") = Worksheets("Tabelle1").Range("A1")
  Case Range("B1")
   Worksheets("Tabelle2").Range("B1") = Worksheets("Tabelle1").Range("B1")
 End Select
End Sub

Gruß Nighty

Answer 2

Erstmal Danke an Nighty,

Leider funktioniert es bei mir nicht wie gedacht, vielleicht liegt irgendwo der Fehler.http://test.de

Ich habe de Excel Datei mit angehangen im Prinzip soll von Tabelle 1 Daten in die Tabelle Reifenprotokoll Übetragen werden per Click von Zelle A auf Tabelle 1 

Answer 3

Hallo Community

Du hättest den Code anpassen müssen,das war ein Beispiel!

Dein Link ist der Falsche!

Code angepasst bis auf die Worksheetsnamen!

Quelle = "Tabelle1"

Ziel = "Tabelle2"

Einzufügen

Alt+F11/Projektexplorer/Tabelle1

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 Select Case Target
  Case Range("B6")
   Worksheets("Tabelle2").Range("G11") = Worksheets("Tabelle1").Range("B6")
  Case Range("C5")
   Worksheets("Tabelle2").Range("C6") = Worksheets("Tabelle1").Range("C5")
  Case Range("D6")
   Worksheets("Tabelle2").Range("E5") = Worksheets("Tabelle1").Range("D6")
 End Select
End Sub

Link zur Beispieldatei!

https://www.file-upload.net/download-14860217/Doppel_Click.xlsm.html

Gruß Nighty

Answer 4

https://supportnet.de/forum/?qa=blob&qa_blobid=16789807715665038544

Hallo Nighty Danke,

Irgendwie hängt bei mir der Wurm drin :) wenn ich einen Button über Entwicklertools mache sagt er mir Makrofehler vielleicht verstehe ich die Verknüpfung nicht.

ICh habe denke ich einen Denkfehler drin.....

Gruß Thomas

Answer 5

Hallo Thomas

Link zur Datei!

https://www.file-upload.net/download-14860225/Doppel_Click.xlsm.html

Gruß Nighty

Answer 6

Hallo Nighty,

Hab die Tabelle aber das mit dem Button will nicht funktionieren mach ich was falsch bearbeiten ist aktiviert ebenso Entwicklertools und Makros aktiviert, woran kann es liegen das er nicht übertragen tut ?

Gruß Thomas

Answer 7

Hallo Thomas

Doppelclick auf die Zelle überträgt die Daten

Also nun nach Butten!

Click auf Button!

https://www.file-upload.net/download-14860233/Button_Click.xlsm.html

Gruß Nighty

Answer 8

Hallo Nighty,

Vielen Herzlichen Dank hast mir den Tag gerettet :)

Gruß Thomas