Microsoft Excel – die besten Beiträge

Hi,

ich habe eigentlich einen Code der funktionieren sollte und möchte über eine Excel VBA Prozedur ein Word Dokument öffnen, welches dann über Excel zum Teil ausgefüllt wird.

Es kommt nun leider fast immer vor, dass sich das Word-Dokument 2x öffnet (1 Leerdokument. Muss dazu sagen, dass sich der Standard-Vorlagenordner auf einem Netzlaufwerk befindet.

Ich habe eine Pause von 1 Sekunde eingebaut, nachdem ich nach diesem Fehler im Netz gesucht habe, leider tritt das Problem weiterhin sehr häufig auf.

Vielleicht kann ja jemand helfen?

Danke im Voraus.

Sub create()
   Dim WordApp As Object
   Set WordApp = CreateObject("Word.Application")
   Call Sleep(1000)
   With WordApp
   .Visible = True
   .Documents.Open ("Q:\Dokument.docx")
   End With
End Sub

Hallo, ich versuche gerade ein Abkürzungsverzeichnis einzufügen, habe die Abkürzungen unter Referenzen eingetragen. Wenn ich das Verzeichnis erstelle, erscheint die 2. Spalte immer rechtsbündig, wie bekomme ich es hin, dass die 2. Spalte linksbündig ist?

so sieht es aus:

So hätte ich es gerne:

Danke im Voraus.

Liebe Grüße

Hey,

Ich möchte das Spalte B alles zusammen gerechnet wird und danach mit Spalte C minus gerechnet wird und die Summe in Spalte D angezeigt wird.

Ich hätte einfach gedacht „B-C“ aber das klappt nd. Wie kann ich das sonst machen?

Benutze zum ersten mal Apple Numbers und hab vorher kein Excel benutzt.

Ich verstehe alle Aufgaben außer Aufgabe 4 c), da ich die Formel nie gesehn hab und auch nicht verstehe wofür man sie benötigt. Wäre für jede Hilfe dankbar.

Moin,

ich suche eine Excel Funktion, mit der ich ein Ergebnis immer auf die nächste Fünferstelle aufrunden kann.

Hintergrund ist, dass ich mit einer einfachen Summenformel einen Gesamtwert von Teilnahmegebühren ausrechne. Mit meiner Formel möchte ich 20% der Teilnahmegebühren, aufgerundet auf das nächste Vielfache von 5, darstellen lassen - also im Prinzip ein Fünftel der gesamten Teilnahmegebühren, aufgerundet auf die nächste Fünferstelle.

Nochmals vielen Dank, ich hätte da noch eine Frage. Ich baue mir gerade eine Tabelle für meine Geldanlagen damit ich Sie besser prüfen kann. Ich habe jetzt in A Datum, B Tage, C Einzahlung, D Prozente, E Aktueller Betrag, F Rendite täglich G Rendite komuliert. Gibt es jetzt eine Formel mit der ich sagen kann nach zb. X Tagen (150 Tagen) wird der Betrag von Spalte C Einzahlung in Spalte G zur komulierten Rendite hinzu gebucht. Danke

was müsste man eigentlich machen um den Kilometerstand vom Auto direkt in eine exceltabelle zu exportieren und das regelmäßig und automatisch?

welche Vorgänge sind da nötig? Was bräuchte man denn alles? Angenommen es ist ein 2015+ Fahrzeug mit digitaler Anzeige.

Hallo,

ich habe folgenden Code in Excel VBA. Leider komme ich nicht weiter.

Ich suche einen Wert der Zelle E1 in Spalte A1.

Ist der Wert aus E1 vorhanden, soll ein Sub geöffnet werden.

Ist dieser Wert nicht vorhanden, soll eine MsgBox geöffnet werden und nach dem Schließen der Box die UserForm1.

Aktuell macht der Code folgendes: Egal ob der Wert vorhanden ist oder nicht, es wird die MsgBox geöffnet und der Code wird auch bei richtiger Zahl nicht ausgeführt.

Ich würde mich freuen, wenn mir einer helfen kann bei meiner Spielerei. Danke.

Sub suche()
Dim zelle As Range


For Each zelle In Sheets("Tabelle1").Range("A1:A1000").Cells
    If zelle.Value = Sheets("Tabelle1").Range("E1") Then
    'Sheets("Tabelle1").Activate
    zelle.Activate
    Call create
    Exit For
    Else

    MsgBox "Nr. ist nicht vorhanden!", vbExclamation
    UserForm1.Show
    Exit Sub
    End If
    'Call create
    Next
End Sub

Hallo, unswar suche ich nach einem Weg in Microsoft Excel entfernungen berrechnen zu lassen um das Fahrt Geld wiederzubekommen...

Also konkret wollte ich fragen ob man z.b. Punkt A und Punkt B eintragen kann und Excel dann den weg in Km berechnet.

Ich habe mitbekommen dass es sowas für viel Geld zu kaufen gibt, woran ich aber nicht wirklich interessiert bin.

Vielleicht gibt es hier ja jemanden der mir hier helfen kann/ will...

Danke schonmal im voraus!

Um die Frage etwas verständlicher zu machen, habe ich einen Screenshot beigefügt.

Ich habe die beiden Spalten AC und AD, welche in AE kombiniert werden sollen. Ich möchte sozusagen nur den Text ausgegeben haben (Lowest, Middle 1, Middle 2 oder Highest) und die 0 soll ignoriert werden, außer beide Spalten enthalten die 0. Wichtig bei der Formel ist zudem, dass sie kopierfähig ist, da es sich um sehr viele Datensätze handelt.

Über Hilfe wäre ich sehr dankbar! :)

Frage an die Excel-Experten:

Gibt es die Möglichkeit, z.B. mit einer "ZÄHLENWENN"-Funktion diejenigen Zellen zählen zu lassen, deren Wert größer ist als der ihrer linken Nachbarzelle?

In der Beispieltabelle müssten also in Spalte 3 die drei Zellen mit roter Schrift erfasst werden, so dass ich unten als Ergebnis eine "3" erhalte.

Danke für eure Hilfe.

Ich habe auf dem Handy Excel und eine Tabelle (Ernährungstagebuch).

Wenn ich auf dem Handy in dieser Excel-Tabelle was eintrage, sie also verändere und dann auf Onedrive speichere, ist alles top. Sobald ich jetzt aber am PC DIESELBE TABELLE aufrufe, kommt eine Fehlermeldung, hier so: schreibgeschützt und so ein Sch***dr***, und ich muss ne Weile warten, dass ich DIESELBE TABELLE am PC ändern kann. Dann ist neuerdings auch das weg, was ich EBEN IN DIESEM MOMENT auf dem Handy in DIESELBE TABELLE eingetragen habe.

Was muss ich tun, dass ich am PC! EBENSO WIE AUF DEM SMARTPHONE ganz normal arbeiten kann???

Hi,

ich komme bei dieser Formel um Rat.

Ich möchte, dass wenn Spalte(x) ein Wort oder ein anderes enthält, die Zahl auf derselben Zeile in Spalte(y) angezeigt wird.

Beispiel:

In Spalte C

=Wenn(Spalte(x,zelle3) enthält "Alpha" ODER "Beta" dann "Spalte(y,zelle3)" wenn nicht dann "-"

Wichtig ist, dass mehrere Wörter verwendet werden können, also dass wie im Beispiel in Feld C2, C3 und C4 dieselben Formeln sind.

Meine Versuche:

Für ein Wort geht es:

=WENN(ISTFEHLER(SUCHEN("Aplha";'A2));0;'B2) --> ersetze null durch erneutes SUCHEN, für 2 wörter

Für 2 Wörter geht es nicht mehr:

=WENN(ISTFEHLER(SUCHEN("Alpha";A2));(ISTFEHLER(SUCHEN("Beta";A2));0;B2);B2)

Vielen Dank im Vorraus!

Wie aktiviere ich Makros? Die Tutorials auf Youtube funktionieren nicht

LG

Ich habe eine Excel Tabelle mit jedem Tag der letzten 15 Jahren und daneben ist ein Zahlenwert. Wie kann ich die Tabelle sortieren, dass eine neue Sortierung ensteht bei der die Tabelle nach Monatstagen sortiert ist.

Bsp: 19/11/21

19/12/21

19/01/22

19/02/22

19/03/22

19/04/22

20/01/08

20/02/08

Liebe Community,

ich brauche eure Hilfe. Folgende Situation:

Excel holt sich aus einer geschlossenen Excel Datei alle Daten und kopiert diese in die offene Excel Datei in eine Tabelle. Das funktioniert soweit ganz gut, dank VBA.

Komischerweise macht er bei Zahlen die Formatierung als Text. Ergo, es kommt zum Fehler, siehe Bild unten. In der Kategorie "Fahrzeug" sind alle Einträge mit der Fehlermeldung bestückt.

Wenn ich nun die ganze Spalte markiere und oben die Formatierung ändern möchte, dann passiert leider nichts. Die Fehlermeldung bleibt. Text -> Zahl

Ich muss auf die Fehlermeldung klicken und dann dort den Befehl geben, den Wert in eine Zahl umzuwandeln. Dann funktioniert das alles einwandfrei.

Die Daten werden jedoch durch ein weiteres Makro auf Ihre nächste Reise geschickt, daher ist die Option die Spalte manuell anzuklicken und die Fehlermeldung zu beseitigen keine Option auf Dauer.

Des Weiteren arbeite ich noch mit der Funktion: „Bedingte Formatierung“ in anderen Tabellenblättern. Dort wird zwar die Zahl hineinkopiert, wenn diese jedoch nicht als "Zahl" deklariert ist, kann Excel die bedingte Formatierung wie z. B. farbliche Hervorhebung bestimmter Zahlengruppen nicht ordnungsgemäß ausführen.

Ich hoffe auf schnelle Hilfe. Danke :o)

Ich habe folgende Tabelle:
PersonA PersonB PersonC

22.01. 5 5 5
23.01. 7 7 7

Die Zahlen stehen für wie viele Schichten die jeweilige Person an dem Datum übernommen hat.

Die Tabelle ist natürlich sehr viel länger und die Daten läppern sich zu mehreren Wochen.
Jetzt möchte ich folgende Informationen herausziehen:
Wie viele Schichten hat PersonA in der letzten Woche gemacht?

Bisher habe ich folgende Formel:

=SUMMEWENNS(Overview!Z2:Z1000; Overview!A2:A1000; HEUTE()-WOCHENTAG(HEUTE();3); "<" HEUTE()-WOCHENTAG(HEUTE();3))   

Overview ist das Tabellenblatt, indem die oben vereinfachte Tabelle hinterlegt ist.
Z2:Z1000 ist die Spalte PersonA (also alle Schichten von PersonA).
A2:A1000 sind die Datums-Zeilen.

HEUTE()-WOCHENTAG(HEUTE();3)

spuckt mir das Datum des letzten Montags (also des Wochenstartes) aus.
Eine Woche startet also immer an einem Montag und endet an einem Sonntag.

An der korrekten Formulierung der Summen-Kriterien hänge ich zur Zeit.

Vielen Dank schonmal für die Unterstützung :)

Hallo, ich habe eine Excelmappe, in der viele Zellen gesperrt sind.

Die zum befüllenden Zellen haben Rahmenlinien.
Wenn ich Inhalte aus anderen Anwendungen mit Strg-V einfüge, gehen oft die Rahmenlinien oder ein Teil davon verloren. Auch beim Ausschneiden und einfügen immerhalb der Mappe passiert dies. Das möchte ich natürlich nicht!
Was tun?

Die Formatierung sperren geht nicht, da ich die Farbe, Schriftart usw. noch ändern können möchte.

Hallo, habe das Problem, dass ich eine WENNNV Formel eingeben möchte, aber Excel diese nicht akzeptiert, wenn ich andere Werte für NV eingeben, funktioniert es komischerweise.

Vielen Dank für die Hilfe

Hallo zusammen,

für den Import einer CSV mit Dialog(um beliebige Datei zu wählen) benutze ich folgender Code:

---------

Private Sub Befehl14_Click()

Dim fd As Object

Dim dateiname As String

 Set fd = Application.FileDialog(1)

 fd.AllowMultiSelect = False

 fd.ButtonName = "Importieren"

 With fd

  If .Show = True Then

   dateiname = fd.SelectedItems(1)

    'DoCmd.TransferText acImportDelim, "txtImportSpezifikation", "Sales", dateiname

   DoCmd.TransferText acImportDelim, "LEER1", "Sales", dateiname

  Else

   Set fd = Nothing

  End If

 End With

End Sub

--------

will gerne aber für Excel- Was muss ich am besten anpassen an den Code?

Vielen Dank im voraus

Gruß

Sahaj