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
328to332
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
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

bedingtes Ausfüllen nach Formatierung....

bedingtes Ausfüllen nach Formatierung....
31.10.2003 13:25:23
Thorsten
Ich habe eine 10K Zeilen Datei, die so aussieht:

|Kundennummer| Name | Ort | <-- fett formatiert
|ArtklNr.|Bezeichznung|Art|
|ArtklNr.|Bezeichznung|Art|
(einige Artikel)
|Kundennummer| Name | Ort | <-- fett formatiert
|ArtklNr.|Bezeichznung|Art|
|ArtklNr.|Bezeichznung|Art|

Und das ganze soll nun so aussehen:
|Kundennummer| Name | Ort |Kundennummer| Name | Ort |
|Kundennummer| Name | Ort |ArtklNr.|Bezeichznung|Art|
|Kundennummer| Name | Ort |ArtklNr.|Bezeichznung|Art|
|Kundennummer| Name | Ort |ArtklNr.|Bezeichznung|Art|

Ich muß also vorn in die Tabelle 3 Spalten einfügen (3mal STRG++) und nun die leeren Felder mit den Werten Kundennummer, Name und Ort füllen.

Ich habe die Daten rechts stehen, als einziges Erkennungszeichen dient mir die fette Formatierung.
Wie kann ich nun eine Formel bauen, die ich nur noch in die Spalten A-C kopiere, damit die Inhalte automatisch ausgefüllt werden?

Über zahlreiche Tipps würde ich mich echt freuen, da ich sonst 2 std. da dran sitze und von Hand die Geschichten kopieren muß...

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: bedingtes Ausfüllen nach Formatierung....
03.11.2003 17:34:38
Reinhard
Hi Thorsten,
nimm das folgende Makro.
Gruß
Reinhard


Sub t()
n = 1
While Cells(n, 1) <> ""
If Cells(n, 1).Font.Bold = False Then
Range(Cells(n, 1), Cells(n, 3)).Cut Destination:=Cells(n, 4)
End If
n = n + 1
Wend
Letzte = n - 1
For n = 1 To Letzte - 1
If Cells(n, 1).Offset(1, 0) = "" Then
Range(Cells(n, 1), Cells(n, 3)).Copy Destination:=Cells(n + 1, 1)
End If
Next n
End Sub

Anzeige

180 Forumthreads zu ähnlichen Themen

Zellen prüfen / Ausgabe wenn Bedingung erfüllt
Kay

Hallo,
Ich brauche dringend Eure Hilfe. Unter https://www.herber.de/bbs/user/54533.xls findet Ihr eine Mappe, in welcher in Spalte A
1 für "Kaufen"
0 für " "
-1 für "Verkaufen"
steht. IN SPALTE B SIND BISHER NUR MANUELL ERSTELLTE BEISPIELEINTRÄGE ENTHALTEN, DAMIT ERSICHTLIC...
12.08.2008 09:51:36
Thread-ID: 1001078
3 Beiträge
Anzeige
Bedingte Formatierung, wenn Spalte gefüllt
belanglos

Hallo,
ich habe gerade ein Brett vom Kopf.
Ich möchte mit der "Bedingten Formatierung" ein Tabellenblatt formatieren. Bedingung soll aber sein, dass die die "Bedingte Formatierung" alles formatiert, wenn in Spalte A bspw. der Buchstabe A steht.
Kann mir damit jemand weiterhelfen....
11.09.2008 14:34:00
Thread-ID: 1009128
5 Beiträge
Prüfung: AddIn vorhanden?
Harald

Hallo zusammen!
Habe im Excel ein AddIn das beim Start von Excel geladen wird, und beim Schließen Entladen wird.
Der Code lautet wie folgt:
----------------------
Private Sub Workbook_Open() AddIns("MeinAddIn").Installed = True End Sub
Private Sub Workbook_BeforeClose(C...
16.09.2008 08:47:00
Thread-ID: 1009955
7 Beiträge
Anzeige
Bedingte Formatierung über Tabellenblätter
Thomas

Hallo,
ich habe in einem extra Datenblatt welches Stammdaten enthält einen Code für die Formatierung
erzeugt (vier verschiedene Farbe Sollen Verwendung finden).
Wie kann ich ohne Verwendung des Menüs Bedingte Formatierung, in dem mir nur 3 Bedingungen
zur Verfügung stehen, ohne...
12.11.2008 14:06:30
Thread-ID: 1023831
2 Beiträge
VBA 2 Din A 5 auf Din A 4 Drucken ?
Peter

Hallo
Habe auf ein Tab 2 Din A 5 Bereiche erstellt.
Wie kann man per Vba oder Formel die Beiden Bereiche auf Din A 4 Drucken?
Mfg. Peter
01.12.2008 17:56:42
Thread-ID: 1029327
3 Beiträge
VBA Querdruck DinA5 auf DinA4 Hochformat
Peter

Hallo,
habe eine Userform die ich aufrufe, dort sind 2 CommandButtons auf die entweder auf DinA5 oder DinA4 gedruckt werden soll.
Habe nun den Makrorecorder laufen lassen.
Private Sub CommandButton1_Click() 'Sub Karte_Druck() ' Karte_Druck Makro Din A 4 Application.ScreenUpdating...
07.12.2008 11:40:36
Thread-ID: 1030830
3 Beiträge
Suche rückwärts nach Wert wenn Bedingung erfuellt
Horst

Hey !
Ich schreibe suchmakros.
Mir find("suchwert") kann ich nache einem bestimmten Inhalt einen Zelle suchen...
O.K.
jetzt möchte ich nach einem Wert in einer zelle suchen der eine bestimmte Bedingung erfüllt.
Zum Bespiel möchte ich nach einem Datum in einer suchen...
...
13.01.2009 07:45:09
Thread-ID: 1039076
5 Beiträge
Bedingte Formatierung: 4stellige Zahl auf Endziffer prüfen?!
TimB83

Hallo,
ich probiere und teste schon seit Tagen, die Nerven liegen fast blank :oops:
Vielleicht geht es ja auch gar nicht...
Das ist mein Problem:
Ich habe in meinen Zellen 4stellige Zahlen, die entweder auf 0, auf 1 oder auf 2 enden.
Die Zellen auf 0 (z.B. 2340) sollen grü...
21.01.2009 23:21:19
Thread-ID: 1042405
4 Beiträge

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
2
5
4
6
3
1
2
2
4
3
1
2
2
3
3
12
3
7
3
2
1
4
4
8
2