VBA – die besten Beiträge

Hallo,

ich möchte eine Liste erstellen, in der ich Barzahlungen von Gästen erfasse.

Die Daten werden bei Buchung oder später eingetragen. Barzahlung kann bis zu einem Jahr später erfolgen bei Check In.

In der letzten Spalte hätte ich gerne eine Checkbox. Beim Setzen sollen alle Spalten links davon grün formatiert werden als erledigt. Ersatzweise könnte es auch mit einem speziellen Zeichen wie einem x gehen.

Ich habe schon eine Reihe von Videos ansgeschaut und Tutorials gelesen. Aber keines konnte mich zum Ziel führen.

Das ganze sollte etwa 100 Zeilen haben. Also 100 Checkboxen, von denen jede die Spalten links von ihr grün färbt.

Man sollte meinen, dass das eigentlich eine recht triviale Anforderung ist. Aber auch mit Hilfe meines Bruders, der ein hochbezahlter IT-Fachmann ist und intensiver Recherche haben wir es nicht hinbekommen.

Ist hier ein ein Excelspezialist, der den Knoten durchschlagen kann?

Hallo, wie kann ich eine Kombobox in Excel über die RowSource Methode als Datum formatieren?

Danke, Gruß

Hallo,

Ich habe Exceltabelle mit Projekten, wo ab ein gewissen Datum Erinnerungen verschickt werden sollen. Da es aber meisten relativ viele Projekte Zeitgleich sind und man schnell den Überblick verliert, würde ich dieses Prozess gerne automatisieren.

D. h. wenn das Fälligkeitsdatum das Datum ''Heute'' überschritten hat, soll automatisch eine Mail, an die Person verschickt werden. (Wenn möglich ohne Extra klick, so dass Excel das jedes mal ganz von selbst überprüft.)

Ich habe mich versucht einzulesen und muss sagen leider scheitere ich an VBA und kenn mich leider gar nicht damit aus.

Vielen Dank für die Hilfe!

Grüße

Hallo,

ich möchte bei Excel VBA aus einer Arbeitsmappe eine zwei seitige Pdf. Exportieren (mittels Makros).

Mein Code sieht bisher wie folgt aus:

Sub SeiteExportieren ()

Dim DateiName As String

Dateiname = "Speicherort"

Tabelle1.PageSetup.PrintArea = "C7:T70, C71:T120"

Tabelle1.ExportAsFixedFormat Type:=xlTypePDF, FileName:=sFileName, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

End Sub

Bei dieser Funktion werden zwar zwei vorgegeben Bereiche herausgezogen, diese jedoch beide auf einer Seite dargestellt. Wie kann man die Funktion so verändern, dass die Seiten nach den angegebenen Bereichen trennt?

Danke im Voraus

Hallo zusammen,

ich habe zwei Spalten mit denselben Daten aber anderes sortiert. die Zellen der Spalte 1 sind zum Teil mit verschiedenen Farben markiert. Ich möchte in Excel, dass wenn der Text in Spalte 2 mit dem Text Spalte 1 übereinstimmt, wird die Farbe der Spalte 1 (entsprechen Zelle) auf Spalte 2 übertragen. Beispiel:

Spalte 1 Spalte 2

2 (grün) 4

12 2

4 (lila) d

d (rot) 12

also wenn 4 (Spalte 2) in (spalte 1) gefunden ist, wird die Farbe von Spalte 1 (C4) auf Spalte 2 (B2) übertragen. Also sprich wird 4 in der Spalte 2 lila markiert.

hat jemand eine Idee? wäre dankbar

Hallo zusammen,

ich bin Praktikant in einem Unternehmen und muss eine Auswertung durchführen mit einer Excel für meinen Team. Ich bin hier bereits seit einigen Stunden am ausprobieren und schaffe es selber nicht.

Ich habe eine Excel-Datei mit drei Tabellen:

Tabelle 1: Input

Besitzt folgende Spalten:

- Spalte B: Datum

- Spalte C: Time

- Spalte P: Beträge

In der Tabelle 1 habe ich die Ursprungsdaten. Hier kopiere ich alle Daten aus einer anderen Datei rein. Hier sind die Beträge Zeile für Zeile hinterlegt für das jeweilige Datum. (Siehe Bild 1)

Tabelle 2: Manuelle Eingabe

Besitzt folgende Spalten:

- Spalte A: Datum

- Spalte B: K1

- Spalte C: K2

- Spalte D: K3

- Spalte E-I: K4 bis K8

In der Tabelle 2 habe ich die Vergleichsdaten, die wir manuell eingeben müssen. Hier sind die Beträge Spalte für Spalte hinterlegt für das jeweilige Datum. Es kommt manchmal vor, dass am selben Datum mehrere verschiedene Beträge hinterlegt sind.

Tabelle 3: Auswertung

Besitzt folgende Spalten

- Spalte A: Datum

- Spalte C: Status K1

- Spalte E: Status K2

- Spalte G: Status K3

Spalte I, K, M, O, Q: Status K4 bis Status K8

Könntet Ihr mir dabei helfen eine Excel-Funktion aufzubauen, die Einträge aus der Tabelle 1 und Tabelle 2 mit dem jeweiligen Datum und Betrag zwischen Spalte P (Beträge-Tabelle 1) und Betrag Spalten B-I (K1-8 - Tabelle 2) vergleicht und eine Auswertung in die Tabelle 3 in die jeweilige Spalte C bis Spalte Q gibt.

Wenn der Betrag übereinstimmt mit "Korrekt" und wenn Falsch "Fehler"

Tabelle 1 - Input

Tabelle 2 - Manuelle Eingabe

Tabelle 3 - Auswertung

Ich habe 3 Tabellenblätter. In Tablettenblatt 1 steht die Gesamtsumme. Ich möchte diese anpassen und nach den Werten aus Tablettenblatt 2 und Tabletten blatt 3 filtern und einen neuen Wert erhalten. Im dritten Tablettenblatt ist noch ein " : "

Also eine lücke doppelpunkt lücke, diese möchte ich bei der Filterung nicht dabei haben.

Ich hätte dies gerne mit dem Befehl =(SUMMEWENNS(

Ich habe mich mit der Tabellenanzahl vertan, jede Tabelle hat 7 Zeilen.

Guten Tag zusammen

Ich möchte gerne, dass eine Exceltabelle automatisiert die Daten von anderen Seiten in der gleichen Mappe überträgt. Und zwar untereinander, ohne dass Sie sich gegenseitig überschreiben.

Danke für das Lösen des Problems.

Wenn ich das Ergebnis aus einer Verkettung kopiere und es zum Beispiel in den Editor einfüge steht am Anfang und am Ende der Ergebnisses ein "
Wie bekomme ich dieses weg, in Excel ist beim Kopiervorgang keines sichtbar.
Egal ob Editor, Word, Tab Zeile - überall wird es miteingefügt

Ich möchte meine Excel Tabelle, welche Kästchen zum Abhacken enthält bei einer Cloud hochladen, damit jeder der einen Link dazu hat, auf diese Excel Tabelle zugreifen kann. Aber wenn ich die Tabelle bei Clouds hochlade wie Onedrive, googledrive, blackbox oder anderes, DANN werden diese "Kästchen" die zum abhacken gedacht waren, nicht mehr angezeigt, dann passiert folgende Fehlermeldung:
"Excel für das Web unterstützt weder die Ausführung noch die Interaktion mit Formularsteuerelemente. Öffnen Sie diese Datei mit der Desktop-App, um Formularsteuerelemente zu verwenden."

Ich habe in meine Excel Datei Text reingechrieben zusätzlich zu meiner Tabelle. Ich will aber nur das meine Tabelle gedruckt wird und der Text soll nur angezeigt werden, wenn man gerade in der Excel drinne ist, aber beim konvertieren in PDF und drucken soll der text nciht da sein.

Und es muss für alle Nutzer unsichtbar sein, die dese Excel Datei zugeschickt bekommen, nicht nur für mich als Ersteller dieser Datei - sehr wichtig !

Guten Tag,

ich habe in meiner Excel Tabelle Kästchen erstellt, und wenn ich ihn anklicke also wenn es erfüllt ist soll die Komplette Zeile in mein Tabellenblatt 2 verschoben werden.

Kann mir da jemand helfen ich habe nicht sehr viel Ahnung von excel :)

Danke im Vorraus

Hallo zusammen,

vorab schonmal, nein ich habe hier absolut 0% Ahnung hiervon und brauche dringend Hilfe!

Ich habe auf der Arbeit bei einer wichtigen Excel Datei eine neue Spalte eingefügt, was dafür gesorgt hat, dass eine wichtige Spalte rechts davon weiter nach rechts verschoben wurde um eine Zelle.

In dieser Spalte wurden Enddatum eingetragen und diese wurden mit einem Makro über VBA Absteigend von jüngerem Datum oben, nach späteren Datum nach unten hin sortiert.

Nachdem ich die neue Spalte zugefügt habe, funktionierte eins nach dem anderen nicht mehr richtig und ich war so dumm zu versuchen das Makro minimal anzugleichen, sodass es funktioniert und habe es dann getestet.

Dadurch habe ich es nur schlimmer gemacht...

Zudem kann ich jetzt nicht mal mehr in der Tabelle scrollen, zumindest in diesem Reiter, in einem anderen Reiter unten, kann ich scrollen in der Datei.

Der Text in VBA Stand jetzt:

Sub Sortieren()

'

' Sortieren Makro

'

'

  Rows("3:500").Select

  Range("B3").Activate

  ActiveWorkbook.Worksheets("Übersicht").Sort.SortFields.Clear

  ActiveWorkbook.Worksheets("Übersicht").Sort.SortFields.Add Key:=Range( _

    "H4:Hl34"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _

    xlSortNormal

  With ActiveWorkbook.Worksheets("Übersicht").Sort

    .SetRange Range("A3:L500")

    .Header = xlYes

    .MatchCase = False

    .Orientation = xlTopToBottom

    .SortMethod = xlPinYin

    .Apply

  End With

  ActiveWindow.SmallScroll Down:=3

  ActiveSheet.Range("$A$3:$L$97").AutoFilter Field:=12, Criteria1:="="

  ActiveWindow.SmallScroll Down:=-12

End Sub

Hallo,

Ich brauche einen Excel experten ich habe das Problem das ich EC-Karten Transaktionen via Email als CSV datei bekomme und normalerweise steht dort erst mal unter Spalte K beispiel die Beträge die gezahlt wurden das wird leider bei Excel halt als Textdatei erkannt oder als Datum. Dann steht dort beispiel 1. Juni oder so.

Ich hab das bisher immer so gemacht das ich auf Währung umgestellt habe also die Betrag Spalte und dann wure beispiel 1,10 € angezeigt.

Das Problem was ich jetzt habe ist das viele Beträge irgenwie garnicht drin stehen es werden mir von 800 Transaktionen nur Dezimahl werte angezeigt die keine Cent werte haben also sprich 11,00 € die Cent werte hab ich das Gefühl sind garnicht vorhanden. Was aber garnicht sein kann.

Dann hab ich eine alte Excel Tabelle genommen die die gleichen Daten beinhalten nur von 2022 und da sind ganz normal auch mal 11,30€ oder so dabei.

Kann es sein das ich irgendwas bei Excel machen muss oder sind die daten einfach so über tragen worden???

Danke

Hallo liebe Community,

welche Formel müsste ich hier in C2 bis C7 verwenden um den korrekten Rabatt zu erhalten? Geht es Ohne Wenn Funktion, falls die Werte in A11-14 geändert werden?

Hallo,

ich habe folgende Formel aufgestellt:

=VERKETTEN(AA8;"";AC11;"";AC14;"";AC20;"";AC27;"";AC35;"";AC40;"";AB48;"";)
Mir ist bewusst dass die "" optional sind.
Jedenfalls würde ich nun gerne nach jeder Zelle einen Zeilenumbruch haben, allerdings weiß ich nicht wie ich das gestalten soll, denn ich kenne die Länge der Zellen nicht, da diese variieren.
Was habe ich für Möglichkeiten?

Hallo,

Ich baue eine Art Ticket System für Excel und ich wollte jetzt eigentlich auf der Start Ebene ne Anzeige erstellen wo man in die Anzahl an offenen Tickets sehen kann.

Also Anzahl Offener, in Beartung und eventuell noch geschlossenen Tickets anzeigt.

Funktionieren sollte es so in der Tabelle die man ausfüllt gibt es eine Spalte worin der Status vermerkt wird zum einen mit einer Farbe aber auch mit einem vor definierten Text wie beispiel "Abgeschlossen"

Ich dachte man kann doch bestimmt mit Excel VBA einen Code schreiben der in der Spalte einfach anzahl grüne Felder aufzählt und in der Home Startseite es dort als Gesamt summe anzeigt.

Ich hab leider kein Tutorial gefunden das meiste mach ich auch über Makro aufzeichner aber sowas aufzeichen kann man glaub ich garnicht.

Wäre interessant wenn mir jemand einen Vorlage Code schreiben könnte sodass ich auch mal davon lernen kann.

Hey, im Bild ist der ausgeschnittene Code. Rot unterstrichen ist die Zeile die Probleme macht. Der Code sollte von dem Sheet "hidden" die Range F5:F&lastRow haben. Beim ausführen ignoriert er aber das "hidden" und nimmt stattdessen das Sheet "dashboard".

Ablauf des Codes:

Letzte Reihe im sheet hidden herausfinden

dropdownRange definieren (Von wo welche Daten?)

dropdownCell definieren (Wo soll dropdown Menü aufrufbar sein?)

Löschen von Dateneinschränkung in dropdowncell

Dateineinschränkung einfügen (Einschränkung nur Inhalte der dropdownRange von Spalte hidden)

Das Programm arbeitet wie gesagt als wäre statt dem rot markierten dieser Code:

Set dropdownRange = dashboard.Range("F5:F" & lastRow)

Hi, ich würde gerne immer die Zellverknüpfung eines Kontrollkästchens auf die überliegende Zelle beziehen. Jetzt habe ich ein Makro gefunden, welches scheinbar immer die rechte Nachbarzeile zuweist, ich hätte aber gerne die darüberliegende, wie muss ich dieses Skript anpassen?

Option Explicit 
Sub
 zellverknuepfung()
Dim Cb As CheckBox
For Each Cb In Tabelle1.CheckBoxes
Cb.LinkedCell = Cb.TopLeftCell.Offset(0, 1).Address
Next Cb
End Sub

Habe ca. 100 Kästchen und finde das per Hand sehr mühsam.
Bin froh um jeden Tipp :)

Guten Abend zusammen.

Kurze Frage:

Wie kann ich so ein Uhrzeit-Rechner in Excel erstellen? (ohne VBA und großes Design)

Danke im Voraus!

Mit freundlichen Grüßen: Robin | TechBrain. :)