Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1468to1472
1468to1472
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

nach doppelklick daten in ein anderes Tabellenblat

Forumthread: nach doppelklick daten in ein anderes Tabellenblat

nach doppelklick daten in ein anderes Tabellenblat
28.01.2016 17:56:55
Peter
hallo ,
ich hoffe(ich weis)es kann mir jemand helfen.
dieses macro soll bei doppelklick in spalte a ,die daten in ein anderes Tabelleblatt schreiben.Im gleichen Blatt geht es aber nicht in ein anderes.
gruss peter 

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim schlNr
Dim Bezeich
Dim Ort
ActiveSheet.Unprotect (" ")
Dim strDir As String
Cancel = True
If Target.Column  1 Then Exit Sub
If IsEmpty(Target) Then Exit Sub
schlNr = ActiveCell(1, 1)
Bezeich = ActiveCell(1, 2)
Ort = ActiveCell(1, 3)
Sheets("Tabelle2").Select
Range("A13") = schlNr
Range("b13") = Bezeich
Range("c13") = Ort
ActiveSheet.Protect (" ")
End Sub

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: nach doppelklick daten in ein anderes Tabellenblat
28.01.2016 18:58:31
KlausF
Hallo Peter,
statt Sheets("Tabelle2").Select schreibe
With Sheets("Tabelle2")
.Range("A13") = schlNr
.Range("b13") = Bezeich
.Range("c13") = Ort
End With
Gruß
Klaus

AW: nach doppelklick daten in ein anderes Tabellenblat
29.01.2016 16:41:48
Peter
Hallo Klaus,
danke das du geantwortet hast.
Leider funktioniert das aber auch nicht. Er schreibt es wieder in das eigene Tabellenblatt.
Gruß Peter

Anzeige
AW: nach doppelklick daten in ein anderes Tabellenblat
29.01.2016 17:50:50
KlausF
Halo Peter,
hatte mir Deinen Code nur kurz angesehen.
Ich vermute, Du meinst die beiden neben Spalte A liegenden Zellen.
Probier mal:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim schlNr As String
Dim Bezeich As String
Dim Ort As String
ActiveSheet.Unprotect (" ")
Cancel = True
If Target.Column  1 Then Exit Sub
If IsEmpty(Target) Then Exit Sub
schlNr = Target.Value
Bezeich = Target.Offset(0, 1).Value
Ort = Target.Offset(0, 2).Value
With Sheets("Tabelle2")
.Range("A13") = schlNr
.Range("b13") = Bezeich
.Range("c13") = Ort
End With
ActiveSheet.Protect (" ")
End Sub

Gruß
Klaus
Anzeige
;

Forumthreads zu verwandten Themen

Daten aus Tabelle in eine andere Tabelle
Cornelia

Ich habe 2 Tabellen mit dem gleichen Aufbau.
Tabelle 1 soll die Daten eingetragen werden. Von mehreren Leuten. Deshalb eben seperat.
Tabelle 2 soll die Daten aus Tabelle 1 übernehmen. Jeweils ein Blatt mit identischen Blattnamen aus Tabelle 1. Bisherige Lösung von mir in jede Zelle rein...
01.10.2008 08:11:00
Thread-ID: 1013510
6 Beiträge
Daten in andere Tabelle übertragen
Karsten

Guten Morgen,
verzweifelt bin ich auf der Suche nach einer Problemlösung für folgende Aufgabenstellung:
In Datei A, Tabelle 1 stehen in A1, A2 und A3 Daten. Diese sollen in eine andere Exceldatei kopiert werden in A1=A1, A2=B2 und A3=C3 und das auch noch fortlaufend. Also wenn z.B. Zeil...
08.04.2009 11:26:01
Thread-ID: 1067662
4 Beiträge
Anzeige
Werte in anderes Tabellenblatt übertragen
Marcus

Hallo, zusammen,
Ich habe hier ein dolles Makro, was mir hier jemand aus diesem Forum geschrieben hat. Dieses Makro funktionierte bisher auch ganz gut, bis durch ein Zufall ein Fehler entdeckt wurde. Dieser Fehler liesse sich durch genau festgelegte Bedingungen umgehen, aber vielleicht läss...
03.10.2009 20:46:05
Thread-ID: 1106914
6 Beiträge
Datenübertragung in anderes Tabellenblatt
Uwe

Guten Morgen zusammen,
mit nachfoldem Code übertrage ich Daten von einem Tabellenblatt (hier "TVöD") in eine Gesamtübersicht (hier "Zeitdaten"):
Sub Datenübertragung() 'Zeilen werden von 5 bis 35 durchlaufen For i = 5 To 35 'Wenn eine 1 in Spalte H also Urlaub... If Sheets("TVöD").Cells...
24.10.2009 18:43:23
Thread-ID: 1111789
3 Beiträge
Anzeige
Daten autom. von einem in anderes Tabellenblatt
einem

Hallo,
Ich möchte gere Daten von einem Tabellenblatt automatisch in ein anderes Tabellenblatt kopieren.
Geneau sehe es so aus:
Ich möchte gerne die Daten aus Tabellenblatt "Daten" in Tabellenblatt "Tabelle" automatisch kopieren lassen. Dass heißt, das die richtige Zahl dem richtigen...
25.11.2009 11:31:55
Thread-ID: 1119901
5 Beiträge
Daten in andere Tabelle bringen
Gerd
Hallo Noraversuche es mit folgender Formel
=WENN(ISTFEHLER(SVERWEIS(C1;Tabelle1!A:B;2;0));0;SVERWEIS(C1;Tabelle1!A:B;2;0))
diese schreibst Du in die Tabelle2 in Spalte D1MfG
Gerd
15.04.2002 20:41:42
Thread-ID: 113525
6 Beiträge
Wert in anderes Tabellenblatt übertragen
Ute

Hallo,
ich brauche dringend eure Hilfe.
Ich habe mehrere Tabellenblätter das erste Tabellenblatt erhält mehrere Termine zu bestimmten Schulungen,
gerne möchte ich neben den Terminen, die Anzahl der noch verfügbaren Plätze angeben.
In dem anderen Tabellenblatt können sich die T...
16.03.2010 16:56:40
Thread-ID: 1146342
11 Beiträge
Daten von eine in die andere Tabelle übertragen
eine

Gibt es hierzu eine Makro Lösung?
Ich habe zwei Sheets:
1. Disposition
2. NMPKurz
Ich möchte die Daten aus der Disposition in NMPKurz in einer anderen Anordnung übertragen.
Hierzu habe ich eine Beispielsdatei eingestellt.
https://www.herber.de/bbs/user/71160.xls
Da...
21.08.2010 14:20:27
Thread-ID: 1173501
8 Beiträge
Anzeige
Daten in anderes Tabellenblatt kopieren
Werner

Hallo zusammen,
ich möchte Daten von Activen Tabellenblatt in die Tabelle1 kopieren. Ich habe es mit nen Makrorekorter propiert aber ohne Erfolg.
Es sollen im Act. Tabellenblatt die Bereiche:
A1:A30 in die Tabelle1 in die gleichen Zellen (A1:A30) kopiert werden.
C1:A30 in die Ta...
15.09.2010 20:26:28
Thread-ID: 1177919
10 Beiträge
Daten auswählen und in andere Tabelle schreiben
Kati

Hallo Zusammen,
ich tüftle mal wieder an einem kleinen Projekt für mich und benötige hierzu Eure Hilfe.
Ich habe eine Datei mit zwei Tabellenblättern. Namensliste und Teilnehmerliste.
Den Namen in Namensliste sind u. a. auch Daten und Schulungsorte zugewiesen.
In dem zweiten Tab...
15.12.2010 10:14:35
Thread-ID: 1191550
8 Beiträge
Anzeige
Daten in anderes Tabellenblatt kopieren
Stefan

Hallo,
ich habe mal wieder ein Problem:
folgender Code wurde mir hier zur Verfügung gestellt und funktioniert auch:
Private Sub CommandButton1_Click() Dim lRow As Long Dim sRow As Long Dim myWks As String Dim wkbZiel As Workbook, wksZiel As Worksheet Dim wksQuelle As Worksheet Set w...
01.04.2011 11:39:42
Thread-ID: 1208393
9 Beiträge
Daten aus tabelle in andere übertragen makro
Jens

Hallo Leute,
nachdem ich mich jetzt seit tagen mit Macros rumärgere dachte ich, ich wende mich mal an die Profis.
Also ich habe folgendes Problem:
Ich habe dein Tabellenblatt das eigentlich als eingabeblatt fungiert. Ich bräuchte ein Makro dass z.B.
Die Zelle B10 von Tabellenbl...
02.08.2011 14:02:25
Thread-ID: 1224570
10 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige