Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelleninhalt auf zweites Blatt übernehmen

Zelleninhalt auf zweites Blatt übernehmen
08.02.2005 12:12:42
Thomas
Hallo zusammen,
kann mir einer sagen wie ich mit VBA den Wert einer Zelle auf ein zweites Sheet
übernehmen kann?
Ich will wenn ich die Zelle H5 makiere das der Wert zwei Zellen daneben (F5)
auf ein zweites Sheet in C1 übernehme. Wenn ich H10 makiere soll F10
übernommen werden.
Besten Dank
Mfg
Thomas

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

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalt auf zweites Blatt übernehmen
Christian
Hi, mit Zelle markieren läuft nichts!
Du musst einen CommandButton oder irgendetwas einfügen...
Hier der restliche Code 

Private Sub aaa()
Dim a As Integer
a = ActiveCell.Row
Cells(a, 6).Select
Selection.Copy
Sheets("Tabelle2").Select
Range("C1").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub
.
Gruß,
Christian
AW: Zelleninhalt auf zweites Blatt übernehmen
HerbertH
wenn ich dich richtig verstanden habe,
müßte es so gehen:
'ins Tabellenmodul

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 8 Then
Call x
End If
End Sub

Sub x()
Dim sh As Worksheet, c
Set sh = Sheets(2)
c = ActiveCell.Offset(0, -2).Value
sh.[c1].Value = c
End Sub
gruß Herbert
Anzeige
AW: Zelleninhalt auf zweites Blatt übernehmen
werner
Hallo Thomas,
folgender Code muß in ein Modul deiner Arbeitsmappe:

Sub Test()
ActiveCell.Offset(0, -2).Copy
Sheets("Tabelle2").Range("C1").PasteSpecial
End Sub

du kannst dieses Makro dann einer schaltfläche od. tastenkombi zuordnen; auch ausführung bei doppelklick ist machbar.
Grüße
werner

300 Forumthreads zu ähnlichen Themen

Daten aus einer Zelle auf mehrere Zellen aufteilen
Gordon

Moin,
ich habe hier einer Zelle (A10) eine bis mehrere Zeichenketten, die jewiels durch ein ";" getrennt werden.
Nun soll jeweils jede Zeichenkette auf drei Zellen aufgespilltet werden:
A1 = Die ersten 10 Zeichen der 1.Kette
B1 = Die nächsten 10 Zeichen der 1.Kette
C1 = Die...
23.08.2008 22:57:00
Thread-ID: 1004183
15 Beiträge
Anzeige
Zelleninhalt (Text) in 2 Spalten teilen
El.

Hallo!
Habe eine Spalte in der Artikelname und Artikelmerkmale, durch drei Punkte getrennt "...", zusammen stehen. Beispiel: Lecker Whisky 21 Jahre ... Lieferung in hochwertiger Schatulle
Wie krieg ich nun den Text links der Punkte in eine extra Spalte und rechts der Punkte in eine extr...
03.09.2008 16:35:00
Thread-ID: 1007155
4 Beiträge
Inhalt einer Zelle aufteilen in Zellen untereinand
thorsten

Hallo,
bitte schaut Euch mal die Liste an
https://www.herber.de/bbs/user/56516.xls
Es geht darum, dass in einer Zelle mehrere email Adressen angegeben sind - getrennt durch ein Semikolon.
Gibt es eine Möglichkeit diese untereinander darzustellen - je eine Adresse in einer zelle...
05.11.2008 12:35:00
Thread-ID: 1021856
4 Beiträge
Anzeige
Zelleninhalt mit Makro auf Spalten aufteilen
Rene

Hallo Experten,
ich benötige bitte eure Hilfe und hoffe, dass meine erste Problemschilderung nicht zu unverständlich ist.
Hier mein Problem bzw. Wunsch-Makro:
Farblich markierte Zellen in Tabelle1: C1: =3453,63+235,64-23563,12
D5: =1234,43-234+234.... usw.
Aufteilung de...
15.02.2009 14:48:00
Thread-ID: 1050879
5 Beiträge
Zelleninhalt teilen
Sandro

hallo
wie kann ich den zelleninhalt teilen und die eine hälfte in die benachbarte zelle kopieren.
beispiel:
Zelle A1: 40900518/240900067
Die Nr. 40900518 soll in der Zelle bleiben
Die Nr. 240900067 soll in die Zelle B1 kopiert werden
Der / soll gelöscht werden.
Danke...
25.02.2009 16:57:21
Thread-ID: 1054069
6 Beiträge
Zellenwert teilen, in listenfeld, verlinken
Tobias

Hallo,
ich weiß nicht ob das möglich ist, aber ich versuche folgendes:
In B habe ich ordnernamen, kommagetrennt:
z.b. B10
"Ordner1, Ordner2, Ordner3"
Wenn B10 selektiert ist, und ich das Makro auslöse, möchte ich, dass ein Listenfeld auftaucht mit dem Namen der 3 Ordner unt...
17.03.2009 03:28:10
Thread-ID: 1060982
11 Beiträge
Zwei Zeilen in einer Zelle
Michael

Hallo,
ich habe folgendes Problem. In einer Zelle steht ein Ort allerdings steht dieser innerhalb der Zelle nach unten verrückt, so dass in der Zelle quasi eine Leerzeile ist. Gibt es eine Möglichkeit diese Leerzeilen innerhalb der Zellen zu löschen?
Ich habe hier mal eine Grafik eingef...
26.03.2009 13:12:43
Thread-ID: 1064220
5 Beiträge
Zwei Bezüge in eine Zelle
Willy

Hallo "Profis",
wer kann mir bitte bei folgendem Problem helfen:
In Zelle A 1 steht Datum (1.1.09), in Zelle A 2 steht das zweite Datum (7.1.09), also IMMER eine Laufzeit von 7 Tagen.
Nun soll bspw. in Zelle A 3 ausgegeben werden:
1.1.09 - 7.1.09
Danke im voraus.
Gruß
10.06.2009 12:10:04
Thread-ID: 1080409
4 Beiträge
Anzeige

Links zu Excel-Dialogen

CommandButton

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
14
1
3
3
4
4
5
10
4
3
2
3
3
4
6
2
6
7
4
3
3
6
3
5
2