Excel, Spalte rechts nebenan kopieren?

Hallo, wie kann ich per Excel VBA eine Range (eine Spalte) mit einer Zelle vergleichen und nach einem Match die Zelle direkt rechts neben der Range (eine Spalte) selektieren?

1 Antwort

Suboptimierer

Von gutefrage auf Grund seines Wissens auf einem Fachgebiet ausgezeichneter Nutzer

Microsoft Excel

15.08.2023, 10:01

Du kannst die normalen WorksheetFunctions (SVERWEIS und Co.) auch in VBA nutzen.

ActiveCell.Value = WorksheetFunction.VLookup("C", Range("MeineTabelle"), 2)

Wenn ich die ganze Spalte markiere und den Zellverbund aufhebe, habe ich ja nur noch einzelne Zellen. Allerdings wird der Inhalt damit nicht kopiert und da ich über 20.000 Zeilen habe, kann ich diese auch nicht einzeln mit dem + rechts unten an der Zelle kopieren. Gibt es irgendein Funktion die die ganze Spalte nach diesem Muster ausfüllen kann?

...zur Frage

Excel - Daten aus Spalten mit Regel zusammenfassen?

Hallo,
ich habe noch eine andere Frage zu Excel:

Wenn ich die Daten mehrere Spalten zusammenfügen möchte, könnte ich die Daten alle manuell in eine Spalte kopieren und Duplikate entfernen. Kann ich aber auch eine Regel einfügen, dass die Daten automatisch eingefügt werden und ich nicht erst die Daten alle manuell kopieren muss. Im Screenshot ein Beispiel. Ich möchte in Spalte D alle Daten aus Spalte A - C haben. Kann ich in Spalte D eine Regel einfügen, so dass ich Spalte A - C nur noch markieren muss und ich die daten nicht manuell rüber kopieren muss?

...zur Frage

Excel Wert einer Zelle ausgeben abhängig einer anderen Zelle?

Hallo,

Ich habe mal wieder ein Problem, "Rangliste" Ich brauche:

Habe 3 Zellen welche jeweils anhand der 3 meisten Punkte aus Spalte J den Namen aus Spalte B ausgeben sollen. Also der 1. hat die meisten Punkte und der Name erscheint dann in einer Neuen "Treppchen Zelle". Der 2. die zweitmeisten Punkte.... usw. und den mit den wenigsten Punkten möchte ich auch noch angeben.

Wie kann ich das am besten machen?

Vielen Dank für eure Hilfe!

...zur Frage

Excel VBA Einträge als Liste untereinander kopieren?

Hay zusammen,

meine Frage ist wie kann ich die Werte Links in der Tabelle rechts untereinander einfügen? Es muss eine Abfrage erfolgen ob die Zeile leer ist und wenn nicht, dann darunter einfügen.

Habe da ein Makro gefunden aber vielleicht kann mir jemand sagen wie der funktioniert. Kenne mich damit nicht aus. Habe die Werte geändert (Zellenangaben) und trotzdem fügt er die Daten untereinander ein.

Sub Makro2()
'
' Makro2 Makro
'
' Tastenkombination: Strg+e
'
Dim Zelle As Range
Dim Bereich As Range
Set Bereich = Range("J3:N3")
For Each Zelle In Bereich
    If IsEmpty(Zelle) Then Exit For
Next Zelle
With ActiveSheet
    .Range("A3:E3").Copy
    Zelle.PasteSpecial Paste:=xlPasteAll, Transpose:=True
    .Range("A3:E3").ClearContents
End With
Application.CutCopyMode = False
End Sub

Verstehe das System nicht ganz.

Kurz: Durch Klick auf Buchen sollen die Werte rechts eingefügt werde. Untereinander bei jeder weiteren Buchung.

...zur Frage

Unterstützung bei Excel?

Guten Abend Community,

ich habe in Spalte A und Spalte B Werte stehen.

Ich muss jetzt ermitteln, ob der Wert in Spalte A auch in Spalte B existiert. Sprich B1 hat ein Wert welcher in Spalte A ist. B2 hat keinen Wert welcher in Spalte A ist. Von mir aus soll die jeweilige Zelle sich in B färben oder in der Nebenzelle der Spalte C ein Wert sein, der mir sagt, dass es hier eine Übereinstimmung gibt.

Beste Grüße

...zur Frage

Fenster fixieren in Excel?

Hey. Es ist ja in Excel möglich sowohl über die Auswahl im Menu Ansicht, als auch durch VBA-Programmierung (wo ich mich nicht auskenne) möglich einen Bereich auszuwählen, welcher fixiert werden soll, wenn man durch das Datenblatt scrollt.
Nun ist es aber anscheinend nur möglich Excel mitzuteilen, welche Spalten links und welche Zeilen oberhalb der ausgewählten Zellen fixiert werden soll.
Bsp: Markierung der Zelle F4. Die Zellen von A1:E3 werden fixiert.

Ist es auch möglich die Range individuell festzulegen. Also dass die "Startzelle" nicht A1 sondern z.B. B2 ist; Range ("B2:F4)?
Ich habe leider nichts dazu gefunden, auch nicht mit VBA.

Ich hoffe es ist klar geworden, was ich meine. Danke

...zur Frage

In Excel zwei zellen vergleichen und 3 ausgeben?

Moin, ich brauche mal eure Hilfe. Ich habe eine Excel Datei und muss zwei Zeilen vergleichen und eine Dritte ausgeben.

Die Excel Datei hat 2 Blätter. In dem ersten Blatt steht in der Spalte "B" Artikelnummern. In dem zweiten Blatt stehen die Artikelnummer in Spalte "A". Jetzt benötige ich aber in der spalte rechts neben der Artikelnummer auf Seite 1 Die Zahl des Feldes rechts neben der Artikelnummer in Seite 2.

Ich habe es bereits mit dem Sverweis versucht, aber bekomme da immer nur #Bezug raus. Das Problem muss ich irgendwie mit einer Formel lösen, da die Datei zu viele Zeilen enthält.

Ich bedanke mich schon mal im voraus.

...zur Frage

Excel Jedes z.B Vierte Zeichen aus einer Zelle kopieren?

Hallo,

im Informatikunterricht stehe ich vor dem Problem aus einer Zelle mit einem langen Text, nur jedes vierte Zeichen in z.B eine andere Zeile kopieren.

Gibt es dafür eine Formel oder muss ich das ganz mühsam rausschreiben.

Liebe Grüße

...zur Frage

Wie kann ich in Excel Formelen kopieren, damit Excel die Bezüge auch beibehält?

Hallo zusammen,

ich habe in Excel eine Tabelle aufgebaut, in welcher ich viele Daten von einzelnen Tagen habe. Nun erweitere ich diese Tabelle immer um eine Woche. Weiter hinten in der Tabelle habe ich eine Zusammenfassung von der einzelnen Woche. Jetzt möchte ich allerdings die Wochenzusammenfassung einfach nur kopieren damit ich die Formel nicht jedes mal wieder neu eingeben muss. Excel verschiebt mir die Summen aber immer nur um eine Spalte anstatt um 7. Gibt es dafür eine Lösung?

Als Beispiel:

In Zelle MQ2 habe ich die Formel "=Summe(B2:H2)" nun möchte ich in MR2 die Formel "=Summe(I2:O2)" haben.

Excel macht mir aber leider nur daraus "=Summe(C2:I2)". Auch wenn ich mehrere Zellen markiere welche immer die gleiche Logik besitzen, dass die Summe aus 7 Zellen gebildet werden soll.

Vielen Dank

...zur Frage

Excel VBA automatisch nächste freie Spalte nehmen?

hi hab mir mit Makros in VBA was zum übertragen von Daten in eine andere Arbeitsblatt zusammengebastelt. Dort soll es in eine Tabelle eingefügt werden die sich automatisch um eine Spalte nach rechts erweitern soll mit jedem Eintrag.

Sub inauftragplus()
   Range("D11:D22").Select
   Selection.Copy
   Sheets("Datenbank").Select
   ActiveWindow.SmallScroll Down:=-81
   Range("B9").Select
   ActiveSheet.Paste
   Sheets("Eingabe").Select
   Application.CutCopyMode = False
   Selection.ClearContents
End Sub

...zur Frage

Excel: Summieren eine Spalte mit Bedingungen. Warum funktioniert meine Formel nicht?

Ich habe zwei Spalten mit Preisen. In Spalte E stehen jeweils für ein Artikel die normale Preise und in der Spalte I, wenn vorhanden, die alternativen Preise von anderen Lieferanten. Jetzt möchte ich die Spalte I summieren, aber so, dass wenn in einer Zelle in Spalte I kein Wert steht, dann wird der Wert aus der benachbarten Zelle in Spalte E genommen. Wie kann ich das am besten realisieren?

Formel:

...zur Frage

Excel VBA, ComboBox + intelligente Tabelle?

Hallo, ich habe folgenden Code:

ComboBox1.RowSource = Worksheets("tabelle3").Range("intelligentetabelle[spalte1]").Address

Diesen Code führe ich auf einer Userform auf einem anderen Tabellenblatt, dem ersten, aus. Das Problem ist, jedes mal zieht sich die ComboBox die daten aus dem ersten Tabellenblatt und nicht aus dem dritten der intelligenten Tabelle. Wie kann ich das beheben?

Danke!

...zur Frage

Excel Formel in tatsächlichen Wert umformen?

Ich habe ein Programm geschrieben, bei dem ich die Werte einer Excel Tabelle, bzw. Spalte einlesen und automatisch in Word Dokument eintragen lasse, jedoch wird am Ende immer z.B. "=SUMME(A575+1)" anstatt "95,00" Euro eingetragen.

Um das Problem zu lösen, muss ich alle Werte der Tabelle tatsächlich eingeben, so wie sie da stehen, aber das ist zu aufwendig. Gibt es einen Weg alle Zellen, die mit einer Formel berechnet werden, direkt als Ergebnis auszugeben in eine andere oder die selbe Zelle?

Hoffe man hat mein Problem verstanden...

...zur Frage

excel Range als Datum formatieren?

Hallo, wie kann ich per Excel Vba eine beliebige Range auf einem individuellen Tabellenblatt als benutzerdefinertes Datumsformat formatieren?

Worksheets("Tabellenblatt5").Range("A1:A14") = Format("ddd. * dd.mm.yyyy")

Mein bisheriger Versuch funktioniert leider nicht.

Danke

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen