Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
500to504
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
500to504
500to504
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Zelle auslesen wenn voll dann...

Zelle auslesen wenn voll dann...
19.10.2004 13:44:40
jürgen
Grüß Gott!
ich habe folgendes Problem zu lösen:Ich habe in spalte AD einen text stehen; in spalte ac ein x bzw. keines!Wenn in spalte ac ein x steht dann soll der inhalt aus AD nach Spalte S kopiert werden wenn kein x steht soll S leer bleiben, da dann dort händisch etwas reingeschrieben werden konnte d.h. ich bräuchte ein makro, da sonst dort wo ich etwas hinein schreiben will eine formel steht!mfg

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelle auslesen wenn voll dann...
KlausK
Hallo Jürgen,
https://www.herber.de/bbs/user/12306.xls
Ich habe ein Muster hochgeladen. Wenn in AC1 z.B. das x steht, wird der Text aus AD1 nach S1 übernommen. War es das, was Du gesucht hattest?
Gruss
KlausK
Nachtrag: dann S1 nach unten kopieren o.T.
KlausK
AW: Zelle auslesen wenn voll dann...
eres
Hallo "Gott-Grüssender",
wieso Makro?
Schreib in die erste Zelle in Spalte S die Formel: =WENN(AC1="x";AD1;"")
und kopiere sie nach unten.
Gruss
eres
AW: Zelle auslesen wenn voll dann...
WernerB.
Hallo Jürgen,
wie gefällt Dir das?

Sub Juergen()
Dim c As Range
Dim laR As Long
Application.ScreenUpdating = False
laR = Cells(Rows.Count, 29).End(xlUp).Row
For Each c In Range("AC1:AC" & laR)
If c.Text = "x" Then
Range("S" & c.Row).Value = c.Offset(0, 1).Value
End If
Next c
Application.ScreenUpdating = True
End Sub

Viel Erfolg wünscht
WernerB.
P.S.: Dieses Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter !
Anzeige
AW: Zelle auslesen wenn voll dann...
Jürgen
WernerB. - darf ich Gott zu dir sagen? DANKE
@eres weil ich in diese Zeile unter umständen auch was hinein schreiben soll und dies mit einer formel zu lösen wäre nicht die beste lösung!
NEIN !
WernerB.
Hallo Jürgen,
ich bin zwar nicht gläubig, aber das geht mir dann doch zu weit!
Gruß
WernerB.
AW: Zelle auslesen wenn voll dann...
19.10.2004 14:05:56
Gert
Hallo Jürgen,
erstelle eine Vorlage, dann ist es doch egal, das die Fromeln gelöscht werden.
Meine Lösung :
=WENN(AC1="";"";AD1)
mfg
Gert

299 Forumthreads zu ähnlichen Themen

Bedingte Formatierung ich kriegs nicht hin.
Tom

Hi,
ich versuch hier eine bedingte Formatierung hinzubekommen aber es will nicht, ich steh voll auf dem Schlauch.
Wenn T5 = S5 dann Gruen ; S5 Darf aber nicht 0 sein
Wenn T5 S5 dan Rot ich hab bei gruen das so:
=S5=WENN(T50;T5;-1)
Bei rot so:
=UND(S5T5;T5=0)
m...
08.08.2008 15:58:37
Thread-ID: 1000337
4 Beiträge
Anzeige
Zelle nichtleer, dann Spalten ausblenden
kellerkind42

hallo.
Ich tue mich sehr schwer mit folgendem Wunsch:
Im Spaltenbereich A-Z:
Im Zeilenbereich 10 -20:
z.B:
Steht in Spalte C etwas in Zeile 10 oder 11 oder 12.... dann Blende diese Spalte aus!
Kann mir bitte jemand auf die Sprünge helfen?
Gruß Reinhardt.
20.08.2008 07:29:00
Thread-ID: 1003062
6 Beiträge
Wenn in Zelle folgender String, dann
mehmet

Hallo Forum,
In Spalte G4:G92 sind viele kodierte Zeichenfolgen.
Fest steht aber, dass diese zu erkennen sind, z.B.
in Zelle G4: METAR EKAH 052150Z AUTO 12005KT 9999NDV DZ OVC080/// 15/14 Q1005=
in Zelle G5: METAR ESSA 051940Z 20006KT CAVOK 11/10 Q1006 NOSIG=
und so weiter.....
06.09.2008 01:08:00
Thread-ID: 1007801
16 Beiträge
Anzeige
Wenn kein Optionsfeld ausgewählt dann MsgBox
Bernhard

Hallo liebe Excel Freunde!
Wer kann mir bitte helfen? Ich habe eine UF mit 2 Optionsfeldern. Ich möchte einen Hinweis mit einer MsgBox bekommen, wenn keines der beiden Optionsfelder ausgewählt wurde.
Wie mache ich das in VBA?
Danke für Eure Hilfe
Gruss
Bernhard
09.09.2008 11:32:23
Thread-ID: 1008391
5 Beiträge
Wenn Zelle leer, dann Grafik löschen
TomTom

Hi,
ich möchte auf meinem Sheet abprüfen, ob die Zelle A41 und B41 leer sind, und wenn ja, soll eine Grafik (.bmp / wurde eingefügt mit Kopieren und einfügen und heisst im Namensfeld "Bild 01")
gelöscht oder unsichtbar werden.
Wie mache ich dies ?
Danke mal
Gruss
Tom<...
22.09.2008 08:28:10
Thread-ID: 1011373
3 Beiträge
Zählen wenn Zelle nicht leer
Tim

Hallo Forum,
wie kann ich in einem Bereich (z.B. A1:A50) die Anzahl der Zellen, in denen ein Eintrag vorhanden ist (Text oder Zahl) zählen?
Gruß
Tim
20.10.2008 11:47:00
Thread-ID: 1017617
3 Beiträge
Textbox - wenn nicht mehr als 3 stellen dann
Patrick

Hallo,
ich habe auf einer Userform eine Textbox in welche je nach Auswahl Kürzel (z. B. BE) eingetragen werden. Es soll nun realisiert werden, dass wenn ich auf einen commandbutton drücke, geprüft wird ob in der besagten Textbox nach wie vor nur "BE" steht oder diese Textbox bearbeitet wurd...
12.11.2008 16:39:47
Thread-ID: 1023910
5 Beiträge
wenn Spalte F nicht leer, ganze Zeile markieren
maxx_1985

Hallo mit'mander
Ich hab ein kleines VBA Probelem. Naemlich das fogende:
Wenn Zelle in Spalte F NICHT leer, dann die ganze Zeile markieren (einfach markieren, keine Farbe und nichts).
Bin gerade dabei mit dem Recorder was zu basteln (da ich noch kein vba kann) und bin an ganau diese...
19.11.2008 18:37:00
Thread-ID: 1026165
11 Beiträge
Anzeige

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
3
3
5
15
5
4
2
2
4
10
2
7
4
1
2
3
4
1
4
23
1
6
6
5
2