Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 12:23:24
Wenn-Formel anpassen
19.04.2024 12:09:19
Unique (Application.WorksheetFunction.Unique)
19.04.2024 11:51:37
Nächsten identischen Treffer suchen
19.04.2024 11:45:34
Feld im SAP auslesen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1540to1544
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
1540to1544
1540to1544
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro zum variablen Auto-Ausfüllen einer Spalte

Makro zum variablen Auto-Ausfüllen einer Spalte
08.02.2017 14:14:34
Julia
Hallo,
ich habe folgendes Problem - ich habe schon einige Zeit online nach einer Lösung gefunden, aber leider nichts Passendes gefunden:
Ich habe eine Datei, in der in einer Spalte (im Beispiel: C) eine Anlagen- und Stationsbezeichnung steht, unter der deren Inhalte aufgelistet sind. Die verschiedenen Anlagen und Stationen sind durch Leerzeilen voneinander getrennt.
Ich suche ein Makro, dass in eine weitere Spalte in jede Zeile die betreffende Stationsbezeichnung (im Beispiel: D), in eine weitere Spalte (im Beispiel: E) die Anlagenbezeichnung schreibt.
Als Kriterium, welche Bezeichnung zu verwenden ist, kann Spalte B herangezogen werden: Auf eine Anlagenbezeichnung verweist das Wort "Anlage" in Spalte B, auf eine Stationsbezeichnung das Wort "Station".
Da die Dateien teilweise 1000 Zeilen und mehr lang sind, wäre es extrem mühsam, alle Zeilen händisch ausfüllen zu müssen.
Ich hoffe, ich konnte mich verständlich ausdrücken und danke schon einmal für die Hilfe.
Userbild

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Areas
08.02.2017 14:44:42
Fennek
Hallo,
teste

Sub Main
range("D2:E20").clear
with columns("C").specialcells(2)
Anl = .cells(1)
for each a in .areas
if a.cells(1).offset(0,-1).value = "Station" then
Sta = a.cells(1).value
else
Sta = a.cells(2).value
end if
a.offset(0,1).value = Sta
a.cells(1).offset(0,1) = ""
a.offset(0,2).value = Anl
next a
end with
End Sub
mfg
mit Formel
08.02.2017 14:48:41
ChrisL
Hi Julia
Screen-Shots sind nervig, weil abschreiben ist doof.
Formel für D3:
=WENN(UND(B3"Anlage";C3"");WENN(B3="Station";C3;D2);"")
Formel für E3:
=WENN(C3="";"";WENN(B3="Anlage";C3;WENN(E2="";E1;E2)))
Sub t()
Dim letzteZeile As Long
With ActiveSheet
letzteZeile = .Cells(Rows.Count, 3).End(xlUp).Row
.Range("E2") = .Range("C2")
With .Range("D3:D" & letzteZeile)
.FormulaLocal = "=WENN(UND(B3""Anlage"";C3"""");WENN(B3=""Station"";C3;D2);"""")"
.Value = .Value
End With
With .Range("E3:E" & letzteZeile)
.FormulaLocal = "=WENN(C3="""";"""";WENN(B3=""Anlage"";C3;WENN(E2="""";E1;E2)))"
.Value = .Value
End With
End With
End Sub

cu
Chris
Anzeige

302 Forumthreads zu ähnlichen Themen

Häufigkeit einer Uhrzeit aus einer Spalte
wolfgang

Hallo Leute
Ich habe eine Spalte mit einer menge Uhrzeiten und möchte die Häufigkeit einer Uhrzeit ( wie oft ist eine eintrag vorhanden)zum Beispiel zwischen 08:00 und 17:00!! Ich weiß das für euch sicher ein leichtes ist jemanden wie mir zu helfen!
Schon jetzt besten Dank für eure Mühe...
02.09.2008 14:57:58
Thread-ID: 1006808
9 Beiträge
Anzeige
3D Diagramm erstellen aus Matrix
Kay

Hallo,
Ich habe in Excel eine Matrix, die folgendermaßen aufgeteilt ist
A B C D
15 12% 10% 15% 20%
30 10% 13% 17% 19%
45 8% 12% 15% 17%
Wie bekomme ich es nun hin, dass mir auf der Größenachse alle %-Werte, auf der Rubrikenachse die Zeile...
29.10.2008 21:38:38
Thread-ID: 1020422
7 Beiträge
Wie Säulendiagramm mit Tabelle mit gestapelten Säu
sohsoh

Hallo,
ich habe folgendes Problem und schon wie ein Irrer probiert, aber bis jetzt noch keine Lösung gefunden.
Ich habe zu Verschiedenen Stoffen jeweils 2 Messwerte in 3 Verschiedenen Zuständen. Jetzt möchte ich ein Säulendigramm erstellen in denen ich 3 Säulen (zu den drei Zuständen je...
14.01.2009 10:48:22
Thread-ID: 1039519
2 Beiträge
Anzeige
Pivot Tabelle in Array auslesen & neu erstellen
Andreas

Hallo Herber Fans,
da PivotTabellen sich nicht immer rational verhalten, ist es zuweilen notwendig, diese zu löschen und komplett neu aufzubauen, damit sie wieder fehlerlos sind und andere VBA Codes die mit ihnen arbeiten, nicht zum Absturz bringen.
Was ich nun realisierte, war ein Code...
12.02.2009 19:20:00
Thread-ID: 1050227
4 Beiträge
Tabellenblätter aus Liste erstellen
StefanS

Guten Morgen,
kaum hat der Tag begonnen und schon hänge ich wieder fest!
Diesmal soll aus einer Liste (bezugnehmend auf die Spalte Section) div.Tabellenblätter mit der Bezeichnung Register_1 usw. erstellt werden. Die Anzahl der neuen Tabellenblätter entspricht der Anzahl der aufgeführt...
12.05.2009 08:10:21
Thread-ID: 1074477
6 Beiträge
Tabellenblatt mit mehreren Diagrammen erstellen
wernerp

Ich habe ein Tabellenblatt mit mehreren Datenblöcken, aus denen ich
Säulendiagramme erstellen und auf dem Tabellenblatt ablegen will.
Es ist das erstenmal, dass ich dabei mit dem ChartObjekt arbeite.
Die Erstellung eines Diagramms bekomme ich hin. Das Problem ist,
dass die n...
21.08.2009 11:59:29
Thread-ID: 1097642
3 Beiträge
alle Tage außer Sonntag in einer Spalte anzeigen
lisa

Hallo
Es ist immer schwierig zu schreiben was mann will.
In der Recherche finde ich zu diesem Zhema Datum recht viel aber nicht das was ich gern umsetzen möchte. Viellleicht gehts auch gar nicht?
Also Ich habe eine Datum SpalteU Diese fängt an mit dem Datum 28.12.2008 und ist vortl...
02.11.2009 12:28:01
Thread-ID: 1113792
4 Beiträge
Erstellen einer weiteren Graphik aus Wertetabelle
Ganna

Hallo,
nachdem ich nach der Berechnung eine Wetetabelle bekomme und mit 1. und 2. Spalte eine Graphik erstelle, möchte ich nun einen weitern Graph aus dieser Tabelle als Zusatzdiagrammblatt mit 1. und 3. Spalte erstellen. Habe ein Teil noch mal kopiert und statt 2 die 3 geschrieben, sowie G...
12.11.2009 12:09:45
Thread-ID: 1116444
4 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
8
1
6
1
5
3
5
2
3
3
6
3
1
3
4
8
4
3
1
3
5
4
5
1
4