Excel VBA: Sverweis Formel - Makro einfügen!

Hi zusammen. Habe mir heute mein erstes Userform gebastelt (Google sei Dank...). Mein UF macht simpel nichts anderes, als Einträge aus der EIngabemaske in eine Tabelle zu füllen.

Dim emptyRow As Long

'Ermitteln der ersten leeren Zeile
emptyRow = WorksheetFunction.CountA(Range("A:A")) + 1

'Wohin werden die eingegebenen Datein eingefüllt?
Cells(emptyRow, 1).Value = ComboBox1.Value
Cells(emptyRow, 5).Value = TextBox1.Value
Cells(emptyRow, 2).Value = TextBox2.Value
Cells(emptyRow, 3).Value = TextBox3.Value
Cells(emptyRow, 7).Value = TextBox4.Value

If OptionButton1.Value = True Then
    Cells(emptyRow, 6).Value = "1. Halbjahr"
End If

If OptionButton2.Value = True Then
    Cells(emptyRow, 6).Value = "2. Halbjahr"
End If


Me.Label7 = "Speichern erfolgreich!"

End Sub

Ich muss auch sagen, es funktioniert prächtig. Die Einträge werden alle korrekt erstellt etc. Nur habe ich in Spalte "H" meiner Tabelle, wo die Daten eingefügt werden, eine Spalte für SVerweis. Diese Formel soll jedesmal, wenn ein neuer Eintrag gespeichert wird, angefügt werden. Wenn ich von anfang an alle Formeln runterziehe bis ans Ende der Tabelle braucht Excel 2Minuten zum das Dokument zu öffnen... Formel lautet: =SVERWEIS($A2;'Tabelle1'!$A$1:$C$31;2;FALSCH) Wobei der Bezug A2 natürlich mit jeder Zeile anders ist (A2, A3, A4 etc.) Wenn ich die Formel "aufzeichne", erscheint folgendes, womit ich absolut nix anfangen kann.

Sub SVerweis_HC()
'
' SVerweis_HC Makro
'

'
    ActiveCell.FormulaR1C1 = _
        "=VLOOKUP(RC1,'Tabelle1'!R[-1317]C[-7]:R[-1289]C[-6],2,FALSE)"
    Range("H1319").Select
End Sub

Kann hier wer helfen?

Bild zum Beitrag
Computer, Microsoft Excel, programmieren, Makro, VBA, Script, Tabelle
Excel soll aus bestehender Zahlenreihe immer den x-ten Wert (hier 96) auslesen

Hallo

ich habe bei Excel die Differenz zwischen einem Prognosewert und einem Messwert für einen Zeitraum von 2 Monaten, die Differenz-Werte sind auf Viertelstunden aufgelöst. Ich würde nun gerne den RMSE für jeden Viertelstunde ausrechnen, das sähe dann so aus dass ich eine vertikale Spalte mit dem Datum hätte und in der Horizonatalen jeweils eine Spalte für 04:00, 04:15, etc bis 23:00. Bei der Berechnung des RMSE für den gesamten Beobachtungszeitraum habe ich schon den jeweiligen Fehlerterm errechnet, das sieht dann so aus: =(Prognose-Messwert)^2. Ich würde nun gerne separat jeden 96. Wert zu der passenden Viertelstunde herauslesen damit ich feststellen kann, wie hoch der Fehler zwischen Prognose und Messwert zu bestimmten Uhrzeiten ist. Mein Problem ist jetzt folgendes: Ich bekomme es einfach nicht hin, dass Excel der Reihe nach jeden 96. Wert ausliest. Wenn ich bspw =I29, =I125 und I221 in meiner neuen Tabelle eintrage, die Felder markiere und mit dem Kreuz nach unten ziehe, macht Excel alles, aber nicht die logische Fortführung mit =I317, =I413 etc Das manuelle Eintragen von einigen tausend Formeln stellt ja auch kein Alternative dar. Ich bitte um Hilfe und bin für jeden Hinweis dankbar

Beste Grüße

und noch eine Frage:

Wenn ich die einfache Differenz zwischen Prognose und Messwert ausrechne und diese Werte dann der Größe nach ordne, müsste es doch möglich sein ein Diagramm auf Basis eines einfach x/y Koordinatensystem zu erstellen, wo ich auf der x-Achse die jeweiligen Differenzwerte auftragen kann und durch die y-Achse deren Häufigkeit. Ist sowas auch mit Excel möglich ?

Microsoft Excel, Microsoft Office, Tabelle
WENN-Funktion (zu viele Argumente)

Moin Moin,

ich wollte für die Arbeit eine Exceltabelle erstellen.(Eine Mappe mit mehreren Blättern)

Wenn ich auf dem Blatt "Maske" ins Feld "B1" einen Namen schreib der auf den anderen Blättern auf "B1" hinterlegt ist, soll er das Feld "B2" des dazugehörigen Blattes in das Feld "B2" des Blattes "Maske" schreiben.

Es Handelt sich hierbei um verschiedene Verkaufsartikel. Jeder Artikel hat sein Eigenes Blatt.

Meine Formel sieht im Moment so aus:

=WENN(B1=Barras!B1;Barras!B2;WENN(Maske!B1=Freibourg!B1;Freibourg!B2;WENN(Maske!B1=Milano!B1;Milano!B2;WENN(B1=Dayton!B1;Dayton!B2;WENN(Maske!B1=Alaska!B1;Alaska!B2;WENN(Maske!B1='Frankfurt(1-farbig)'!B1;'Frankfurt(1-farbig)'!B2;WENN(Maske!B1='Frankfurt(2-farbig)'!B1;'Frankfurt(2-farbig)'!B2;WENN(Maske!B1=Frontera!B1;Frontera!B2;WENN(Maske!B1;Loreto!B1;Loreto!B2;WENN(Maske!B1;Mataro!B1;Mataro!B2;WENN(Maske!B1;Teresina!B1;Teresina!B2;WENN(Maske!B1=Borneo!B1;Borneo!B2;WENN(Maske!B1=Soroni!B1;Soroni!B2;WENN(Maske!B1=Trinidad!B1;Trinidad!B2;WENN(Maske!B1=Malaga!B1;Malaga!B2;WENN(Maske!B1=Stuttgart!B1;Stuttgart!B2;WENN(Maske!B1=Kisumu!B1;Kisumu!B2;WENN(Maske!B1;Manica!B1;Manica!B2;WENN(Maske!B1=Mongu!B1;Mongu!B2;WENN(Maske!B1=Beja!B1;Beja!B2;WENN(Maske!B1=Caribien!B1;Caribien!B2;WENN(Maske!B1=Toulon!B1;Toulon!B2;WENN(Maske!B1=Jamaica!B1;Jamaica!B2;WENN(Maske!B1=Java!B1;Java!B2;WENN(Maske!B1=Hagen!B1;Hagen!B2;WENN(Maske!B1=Lakewood!B1;Lakewood!B2;WENN(Maske!B1=Weyburn!B1;Weyburn!B2;WENN(Maske!B1=Sölden!B1;Sölden!B2;WENN(Maske!B1=Tulsa!B1;Tulsa!B2;WENN(Maske!B1=Lido!B1;Lido!B2;WENN(Maske!B1=Washington!B1;Washington!B2;WENN(Maske!B1=Cadiz!B1;Cadiz!B2;WENN(Maske!B1=Lerida!B1;Lerida!B2;"0"))))))))))))))))

kurz:

=WENN(B1=Barras!B1;Barras!B2;WENN(Maske!B1=Freibourg!B1;Freibourg!B2;WENN....

wenn nichts zutrifft soll er "0" ausgeben.

Nun sagt er mir "Zu viel Argumente", ist das so? kann man das umgehen oder sonst etwas tuhen?

Ich danke schon mal für die Antworten und eure Lösungsvorschläge.

MfG

kray

PC, Office, Microsoft Excel, Tabelle
Excel ZÄHLENWENN mit relativen Bezug auf Zelle oberhalb der aktuellen

Hallo,
Ich habe eine Tabelle, in der ich die erste Spalte auf Duplikate überprüfen möchte.
Dazu sorteiere ich diese Spalte (alles Zahlen) in aufsteigender Reihenfolge und möchte nun die "Zählenwenn"-Funktion verwenden, um die Duplikate zu zählen.
Da die Spalte ja sortiert ist kann ich sicher sein, dass gleiche Zahlen immer übereinander liegen, sodass ich in der "Zählenwenn"-Funktion folgendes haben möchte:

=ZÄHLENWENN(Bereich;Inhalt=Inhalt der Zelle oberhalb)

Die Zählenwennfunktion durchläuft ja alle Zellen im Bereich, weshalb (theoretisch) die Funktion "Adresse()" mit "Zeile()" und "Spalte()" als Parameter die aktuelle Zelle referenzieren/sich darauf beziehen.
Das würde bedeuten, dass ich in der "Zählenwenn"-Funktion als zweiten Parameter eigentlich nur folgendes eingeben müsste:

Adresse(Zeile()-1;Spalte())

Funktioniert nicht.
In einigen Beispielen habe ich gesehen, dass Bezüge auf andere Zellen in der "Zählenwenn"-Funktion mit einem "&" beginnen, also habe ich folgendes versucht:

=ZÄHLENWENN(A2:A3000;&ADRESSE(ZEILE()-1;SPALTE()))

Wieder kein Erfolg.

Deshalb die Frage: Wie kann ich in der "Zählenwenn"-Funktion in Excel mich auf eine Zelle, relativ zur aktuellen beziehen? Das hier genannte Beispiel wird sicher auch anders zu lösen gehen, aber den genannten relativen Bezug (also relativ zur Aktuellen Zelle) könnte man in der Zählenwenn schon öfters brauchen. Danke und lg, Springrbua

Microsoft Excel, Funktion, VBA, Anzahl, Tabelle, zaehlenwenn
Excel: Zeilen bedingt ausblenden

Hallo! Wieder hab ich eine Frage zu meinem Excel Spreadsheet:

Ich habe mir in den Kopf gesetzt (ohne zu wissen ob/wie es möglich ist), dass ich Zeilen im Spreadsheet ausblenden möchte.

Ich trenne hier "Spreadsheet" und "Tabelle" mit Absicht. Wenn ich "Spreadsheet schreibe, meine ich das gesamte Blatt, "Tabelle" meint eine kleine Tabelle im Spreadsheet.

Zum Speadsheet an sich: Es besteht aus einem Feld am oberen Rand, in dem Werte vermerkt werden.

Darunter befindet sich eine große Tabelle, die u.a. diese Werte als Ergebnis einer Gleichung darstellt. Unter dieser großen Tabelle befinden sich weitere Felder, die auf die Ergebnisse in der Tabelle einfluss nehmen.

Beispielsweise könnte man sagen:

Das obere Feld beinhaltet Einnahmen - die Felder unter der Tabelle Kosten. Die Tabelle verrechnet dann Kosten mit Einnahmen und vergleicht diese. So könnte man z.B. mehrere Szenarien austesten.

Im obersten Feld werden also bspw. 1000€ eingetragen. Im ersten Feld unter der Tabelle 200, im zweiten 500, etc. (Macht jetzt so keinen Sinn, weil man sofort sieht, was mehr Gewinn bringen würde, ist in der Tabelle aber viel komplexer, sodass es sinnvoll ist). Die Tabelle spuckt dann in der ersten Zeile aus, dass wir 800€ Gewinn haben, die zweite Zeile 500€. durch bedingte Formatierung sagt mir die Tabelle jetzt, dass 800€ besser sind als 500€ (wie gesagt, klingt behämmert, aber einfacher kann mans nicht erklären).

In der Realität werden es aber bis zu 100 Szenarien, sodass in den Feldern unter der Tabelle bis auf die ersten 2 Zellen immer 0 steht und dadurch die Ergebnisse in der Tabelle Zahlen werden wie: 800, 500, 1000, 1000, 1000, 1000, ... . Dadurch wird das ganze Ding unnötig groß und sieht nicht mehr ansehbar aus.

Meine Idee wäre jetzt, dass ich die Zeilen 3-100 in der Tabelle, sowie die Felder 4-100 ausblende, wenn im Feld 4 unter der Tabelle nichts steht. Wenn ich dort etwas eintrage, werden Feld 5 unter der Tabelle, sowie Zeile 4 in der Tabelle aufgedeckt.

Ich hoffe, die Erklärungen sind einigermaßen schlüssig. Zum Ende noch: Ich habs auf google schon probiert und rausgefunden, dass das so einfach nicht funktioniert. Wenn es jetzt über irgendwelche Makros (oder noch komplizierter) gehen wird, bitte ich euch, es so idiotensicher, wie nur möglich, zu erklären.

Weiterhin hab ich nicht vor, die Zellen einfach weiß zu machen und die Schrift auch weiß. Ich möchte, dass die Zellen wirklich verschwinden, sodass alles etwas zusammenrückt.

Ich hoffe ihr könnt mir helfen. (=

Bis dahin

Pepsi (=

Microsoft Excel, Zeilen, Zellen, Ausblenden, Tabelle

Meistgelesene Fragen zum Thema Tabelle