Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
25.09.2025 16:01:26
VBA - Laufzeitfehler 9105 zu viele Zeichen 255
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1268to1272
1268to1272
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zellwerte übertragen

Forumthread: Zellwerte übertragen

Zellwerte übertragen
mehmet
Hallo Forum,
leider bekomme ich folgendes nicht gelöst:
Werte in Spalte CN sollen dort eingetragen werden wo in Spalte CO die Zellbezüge stehen
Wenn Bsp in Zelle CN4 "Auto" steht, dann soll in Zelle BF34 auch "Auto" stehen
(mit ganz gleiche Formate von CN4
Aber die Information von BF34 Bezug steht in Zelle CO4.
Dank im Voraus
Gruss
mehmet
https://www.herber.de/bbs/user/80915.xls
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Zellwerte übertragen
10.07.2012 16:29:34
Erich
Hi Mehmet,
probier mal 

Option Explicit               ' immer zu empfehlen
Sub Uebertrag()
Dim lngLast As Long, lngZ As Long
With Worksheets("Tabelle1")
lngLast = .Cells(.Rows.Count, 92).End(xlUp).Row
If lngLast > .Cells(.Rows.Count, 93).End(xlUp).Row Then _
lngLast = .Cells(.Rows.Count, 93).End(xlUp).Row
For lngZ = 4 To lngLast
If .Cells(lngZ, 92)  "" And .Cells(lngZ, 93)  "" Then _
.Range(.Cells(lngZ, 93)).Value = .Cells(lngZ, 92)
Next lngZ
End With
End Sub

Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: Zellwerte übertragen
10.07.2012 16:40:08
mehmet
Hi Erich,
super, klappt. Dank Dir herzlich.
Nur die Formatübernahme fehlt noch.
Gruss
mehmet
auch Formate übertragen
10.07.2012 17:07:07
Erich
Hi Mehmet,
die Formate hatte ich völlig übersehen. Der folgende Code überträgt sie,
allerdings nicht von Spalte CN (hast du oben geschrieben),
sondern von CO (sinnvoller nach der Beispieltabelle): 

Option Explicit               ' immer zu empfehlen
Sub Uebertrag()
Dim lngLast As Long, lngZ As Long
With Worksheets("Tabelle1")
lngLast = .Cells(.Rows.Count, 92).End(xlUp).Row
If lngLast > .Cells(.Rows.Count, 93).End(xlUp).Row Then _
lngLast = .Cells(.Rows.Count, 93).End(xlUp).Row
For lngZ = 4 To lngLast
If .Cells(lngZ, 92)  "" And .Cells(lngZ, 93)  "" Then
.Cells(lngZ, 93).Copy .Range(.Cells(lngZ, 93).Value)
.Range(.Cells(lngZ, 93)).Value = .Cells(lngZ, 92)
End If
Next lngZ
End With
End Sub
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich
Anzeige
AW: auch Formate übertragen
10.07.2012 17:12:30
mehmet
Super, klappt.
Dank Dir.
Ich hatte schon probiert:
.Range(.Cells(lngZ, 93)).Value = .Cells(lngZ, 92)
.Range(.Cells(lngZ, 93)).Font.ColorIndex = .Cells(lngZ, 92).Font.ColorIndex
.Range(.Cells(lngZ, 93)).Interior.ColorIndex = .Cells(lngZ, 92).Interior.ColorIndex
.Range(.Cells(lngZ, 93)).Interior.Pattern = .Cells(lngZ, 92).Interior.Pattern
Ging aber nicht.
Werde mir jetzt dein Code anschauen.
Herzlichen Dank nochmal
Gruss
mehmet
Anzeige
;

Forumthreads zu verwandten Themen

Array benennen nach Zellwerten
chris

Hallo VBA Experten,guten morgen.
habe eine frage und zwar wie ist es möglich ein Array zu benennen ?
Momentan habe ich es so...
Dim kriterien(20)
Dann wenn ich in den Debugger gehe steht dort
kriterien(0)
kriterien(1)
kriterien(2)
usw...
Wie erreiche ich es...
13.08.2008 06:52:02
Thread-ID: 1001351
5 Beiträge
Zeilen einfärben abhängig von Zellwerten
Zellwerten

Hi Leute
Da ich nicht weiß, wie ich nach meinem Problem suchen kann, beschreibe ich es einfach mal kurz. Vielleicht kann mir ja jemand helfen.
Ich habe ein Excel-File, das xSpalten hat und xZeilen.
In einer Spalte (in meinem Fall Spalte F) stehen die verschiedenen Auftragsnummern, a...
18.08.2008 16:57:26
Thread-ID: 1002687
6 Beiträge
Tb.Blatt nach Zellwert speichern
Peter

Guten Morgen allerseits,
mir raucht als VBA Neuling der Schädel, vielleicht könnt Ihr mir helfen. Ich versuche Tabelle 2 in Abhängigkeit einer Zelle in Tabelle 1 in einem bestimmten Ordner zu speichern, wobei das speichern erst
zulässig sein darf wenn alle einzugebenen Daten vorhanden s...
28.08.2008 09:50:00
Thread-ID: 1005302
3 Beiträge
Zellwerte zählen
Markus

Hallo,
ich habe folgendes Problem:
Spalte 1 Spalte 2
Probe 1 DAD
Probe 1 DAD
Probe 1 TIC
Probe 1 XIC
Probe 2 DAD
Probe 2 DAD
Probe 2 DAD
Probe 2 TIC
Probe 2...
29.08.2008 13:45:00
Thread-ID: 1005821
4 Beiträge
Zellwerte aus markierten Tabellen übertragen
obelix-xxl

Hallo,
in mehreren Tabellen habe ich in der gleichen Spalte X11:X100 Summenwerte eingetragen.
Die Spaltenbeschriftung ist in der Zelle X10 und ist gleich dem Tabellennamen, z.B. -1.234.
Ich benötige nur die Ergebnisse der markierten Tabellenblätter. Diese in den markierten Tabellen...
06.09.2008 17:29:20
Thread-ID: 1007869
3 Beiträge
Entspricht doppeltes Hochkomma Zellwert >0?
Jesko

Hallo an alle,
wer kann mir sagen, welchem Zellwert das doppelte Hochkomma entspricht.
Hier der Zusammenhang:
In Spalte K meiner Tabelle wird ein Liefertermin genannt (Format: TT.MM.JJJJ).
In Spalte S ist der tatsächlich erreichte Liefertermin aufgeführt (Format wie oben).
I...
15.09.2008 17:51:31
Thread-ID: 1009863
6 Beiträge
Zellwert übertragen
chrissey

Hallo Leut,
hab ne relativ allgemeine Excelfrage. Kann man bei Klick auf eine Zelle den Zellwert auf eine andere
Zelle übertragen. Also angenommen ich habe folgenden Zellbereich:
A
1 Hans
2 Peter
3 Klaus
4 Thomas
5...
30.09.2008 08:24:00
Thread-ID: 1013243
3 Beiträge
Datum in Abhängigkeit eines Zellwertes setzten
Tom

Guten Morgen,
Ich hab hier ein aktuelles Problem das ich schnellstens lösen muss.
Meine Tabelle besteht aus den Spalten A bis Q. In Spalte P wird ein "X" eingetragen was den Datensatz in ein neues Tabellenblatt kopiert was auch super funktioniert.
Nun möchte mein Chef das wenn das "...
07.10.2008 07:37:00
Thread-ID: 1014581
6 Beiträge
Excel-Zellwert in Word einfügen
Alexander

Hallo zusammen,
tolles Forum.
Ich habe folgendes Problem: Ich habe ein Word-Dokument mit Formular-Felder.
Diese sollen mit Werten aus einer Excel-Tabelle gefüllt werden.
Der VBA-Code muss im Word-Dokument stehen.
ActiveDocument.FormFields("text1").Result = workbooks("Mappe1....
23.10.2008 21:31:00
Thread-ID: 1018804
6 Beiträge
Anzeige
Pfeilfarbe- und Bewegung abhängig von Zellwerten
Zellwerten

Hallo zusammen,
unter Online-FAQ bin ich über folgenden Code gestolpert.
Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("A1:B1")) Is Nothing Then Exit Sub With Shapes("Autoform 1") If Range("A1").Value > Range("B1") Then .Rotation = 90# .Fill.ForeCol...
06.11.2008 20:47:00
Thread-ID: 1022428
8 Beiträge
Zeilenwerte abhängig von Zellwert
Zellwert

Hallo Excelfreunde,
wie lässt sich folgendes bewerkstelligen?
Im Zellbereich A2:A13 stehen fortlaufend die Zahlen 1 bis 12. Wenn ich nun in die Zelle A1 die Zahl 1 eingebe, soll mir in B1 der Zellwert derjenigen Zelle der Spalte B aus derjenigen Zeile, in der in Spalte A die Zahl 1 steh...
31.12.2008 15:52:08
Thread-ID: 1036162
6 Beiträge
Anzeige
Zeilen löschen mit Zellwert über...
Norbert

Hallo,
habe folgende Frage:
Wie schreibt man als Makro: lösche alle Zeilen deren Inhalt in Spalte K kleiner 180 ist.
Besten Dank für RüA!
27.01.2009 17:46:00
Thread-ID: 1044330
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige