Guten Abend,
ich habe mich gefragt ob es ein Programm gibt welches für gezielte Fenster verwendet kann, sprich ich mache z. B. ein Makro für einen Browser welcher durchgehend läuft während ich andere Aktivitäten am PC ausführe.
Freue mich auf einige antworten.

Danke!

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

1. Wenn eines der Makro in Word, was du erstellt hast, nicht mehr funktioniert? Selbst dann nicht, wenn du es nochmals erstellst??
2. Wenn du diese Zeichen „«“, „í“ und „ò“ auch so erstellt und dann auch nicht mehr benutzen kannst???

Hi,

momentan habe ich in meiner Tabelle1 einen Code, welcher bei änderungen in spezifischen Spalten, die Zeilenzahl in das Worksheet "Tabelle7" schreibt.

Eigentlich möchte ich es aber so schreiben, dass wenn ich jezt auf die Zelle im Worksheet "Kontrolle" klicke, ich ganz automatisch zu der Zeile springe, welche momentan in "Tabelle7" steht.

Ich habe überlegt, dass mit einem Makro zu machen, welchen man anklickt, dann die entsprechende Zelle in "Tabelle7" auswählt und somit zum Worksheet "Tabelle1" in die richtige Zeile wechselt. Scharfen Beobachtern wird nun allerdings auffallen, dass ich keine Ahnung habe, wie ich den Zellenwert von Tabelle7 als Zeilenziel für Tabelle1 einstelle. ;D

Wäre echt super wenn mir da jmd helfen könnte. Alternative Lösungsvorschläge sind auch immer gerne gesehen.

PS: Ich rufe über Tabelle7 das Makro auf, da ich es nciht hinbekomme, ohne Modul worksheetübergreifende Makros zu schreiben.

Hallo an die helfende Gemeinde,

ich habe eine Libre Office Tabellenspalte mit 4000 Zeilen. Darin befinden sich Zahlenkombinationen in folgender Form:

7-646-444
7-656-112
7-661-542
...

und so weiter (es gibt keine 0, 8 oder 9). Ich benötige nun in einer Spalte daneben jeweils die Angabe, wie viele verschiedene Ziffern jede Kombination enthält.

7-646-444 wäre also 3
7-656-112 wäre also 5
7-661-542 wäre also 6

Gibt es eine Möglichkeit, dieses über einen Automatismus abzubilden?

Anschließend möchte ich jede der Kombinationen noch mit einer Endung versehen

7-646-444.mp4

Sowas geht sicher. (Hilfsspalte und verketten??) Ich bitte freundlichst um Hilfe. Bin völlig aufgeschmissen, wenn ich das alles manuell machen müsste ;-D

Vielen Dank schon mal in Voraus für nütztliche Tipps.
Der Spark

Hallo, liebes Team,

ich habe eine Frage bzgl., Excel. Ich wollte was erstellen oder gibt es da Vorlagen?

In der Tabelle sollen wiederkehrende Aufgaben vorkommen, d. h. wenn XY neu Eintritt in der Schule soll erst mal bei der Aufgabenzeile die 1 Aufgabe automatisch eingetragen werden z. B. in den ersten 2 Wochen Eingewöhnungsphase dann markiert werden grün das Datum, wenn alles ok und die 2 Wochen noch nicht abgelaufen ist, wenn die Aufgabe aber nicht abgeharkt wurde, soll es rot werden zu einem Datum vorher noch gelb, um zu sehen, das es knapp wird die Aufgabe zu erledigen. Wenn aber abgeharkt, soll direkt die nächste Aufgabe eingetragen werden sozusagen. Gibt es da eine Vorlage oder kann man da eine Vorlage nehmen, was eigentlich als Projektplan genommen wird? Der Zeitplan ändert sich in der Regel nicht so das dann z. B. die nächste Aufgabe ist Praktika suchen in 4 Wochen passieren soll.

Habt ihr Tipps, wie ich so was gut umsetzen kann habe smartsheet und Gantt angeschaut, aber weis nicht, ob es damit umsetzbar ist.

Bin für jeden hilfreichen Tipp dankbar

Hallo zusammen,

ich stehe im Moment auf dem Schlauch.... Leider bin ich kein Profi in VBA.

Mein Problem ist folgendes: Ich möchte bestimmte Spalten aus einem Tabellenblatt in ein anderes kopieren. Da die Reiehnfolge der Spalten nicht immer gleich ist, ermittle ich die zu kopierenden Spalten anhand der Überschrift in der ersten Zeile. Soweit so gut...

Nun scheitere ich leider an der Umsetzung. Bis zum kopieren funktioniert es. Doch klappt das einfügen in das neue Tabellenblatt nicht...

Es tritt folgender Fehler auf:

"Laufzeitfehler 1004

Die Select-Methode des Range-Objektes konnte nicht ausgeführt werden"

Ich hoffe ihr könnt mir weiterhelfen

Viele Grüße

Hallo!

Ich klicke mich schon seit geraumer Zeit durchs Netz, finde aber keine Antwort auf meine Frage:

Ich möchte für mein Unternehmen eine Rechnungsvorlage in Word 2016 erstellen, in dem diverse Pflichtfelder erstellt werden sollen, damit die Mitarbeiter nichts vergessen. Ziel dessen ist, dass die Mitarbeiter die Datei nicht speichern können, wenn diese Felder nicht ausgefüllt sind.

Zusatz: Ich habe gar keine Erfahrungen mit Makros, also wenn dieser Weg die Lösung sein soll, bitte für Dumme erklären :)

LG

DeFa1

Hallo liebe Community,

ich habe schon wieder eine Excelfrage, hoffentlich vorerst meine Letzte:

Kann man für eine Zelle eine Formel erstellen, diese Formel schützen und dennoch einen manuellen Eintrag ermöglichen?

Es geht um folgendes: Ich habe einen Stundenzettel, in welchem sich die Stunden automatisch zusammenrechnen mit 0,75 Stunden Pause.

Ein Arbeitstag von 8:00 bis 16:00 Uhr hat also 7,25 Stunden. Arbeisstart werden in C und D eingetragen. Um die Pausen auszurechnen existiert folgende Formel:

=WENN(ISTLEER(D18);"";((D18-C18) 24)-0,75)

Nun soll die Zelle aber auch per Hand eingetragen werden können, wenn z.B. Urlaub genommen wurde oder die Pausenzeit von den 0,75 Stunden abweicht oder KRankheit oder ... Daher kann ich die Formel nicht schützen.

Wenn jetzt jemand per Hand 8 Stunden einträgt, ist die Formel weg. Daher würde ich sie gerne schützen.

Geht dies und wenn ja wie?

LG Karsten

Hallo,

leider bin ich zu doof, um mit Numbers ein vernünftiges Makro zu erstellen.

Ich möchte gern, dass ich einen Namen in die Tabelle eintrage, das Makro soll dann diesen Namen nehmen und auf einer bestimmten Internetseite diesen Namen eingeben und einen Wert dieser Seite in die Tabelle eintragen.

Ich habe viele Magickarten und wollte diese in der Liste abspeichern.

Könnt ihr mir vielleicht sagen, wie man das Makro erstellen kann?

Vielen lieben Dank

Hallo ich hoffe Ihr könnt mir helfen :/

Folgendes Problem: Wenn ich die Mail versende, öffnen sich für jede Zeile eine extra Email und leider auch nur jeweils ein Empfänger und einer in cc.

Was muss ich nun in der Programmierung hinzufügen, um nur eine Email geöffnet zu bekommen, mit mehreren Empfängern (Falls mehrere Kreuze gesetzt worden sind). Ich danke euch echt wenn Ihr mir helfen können :/

Ich habe mir die Bausteine aus dem Internet zusammengesetzt, bin daher kein Profi darin.

Programmtext:

Private Sub Send_Email()
   '-------------< Send_Email() >-------------
   Dim sTitle As String
   sTitle = "Test-HTML Email from Excel"
   '< HMTL holen >
   Dim sTemplate As String
   sTemplate = Sheets("ini_Vorlage").Shapes(1).TextFrame2.TextRange.Text
   '</ HMTL holen >
   '----< Send with Outlook >----
   Dim app_Outlook As Outlook.Application
   Set app_Outlook = New Outlook.Application
   '--< Email einstellen >--
   Dim objEmail As Outlook.MailItem
   Dim sEmail_Addresscc As String
   Dim sEmail_Address As String
   Dim iRow As Integer
   For iRow = 4 To 100
       If Cells(iRow, 21) = "x" Then
           '< get Email Address >
           'Column 2, B
           sEmail_Address = Cells(iRow, 19)
           sEmail_Addresscc = Cells(iRow, 20)
           '</ get Email Address >
           '< Fill Placeholders >
           Dim sHTML As String
           sHTML = Replace(sTemplate, "[@Name]", sEmail_Address)
           '</ Fill Placeholders >
           '--< Send Email >--
           Set objEmail = app_Outlook.CreateItem(olMailItem)
           objEmail.To = sEmail_Address
           objEmail.CC = sEmail_Addresscc
           objEmail.Subject = sTitle
           'objEmail.HTMLBody = sHTML 'use .HTMLBody for HTML
           objEmail.Body = sHTML      'and .body for pure Text
           objEmail.Display
           '--</ Send Email >--
       End If
   Next
   '< Abschluss >
   Set objEmail = Nothing
   Set app_Outlook = Nothing
   '</ Abschluss >
   MsgBox "Emails erstellt", vbInformation, "Fertig"
   '----</ Send with Outlook >----
   '-------------</ Send_Email() >-------------
End Sub

Ich arbeite gerade an einer Präsentation und komm mit den antworten überhaupt nicht zurecht. Alle schreiben, man braucht Makros, aber ich schein da was falsch zu machen, es funktioniert nämlich nicht mehr wie beim letzten Mal.

Einfache und genaue Beschreibung wäre schön, Libre Office Impress, nicht Powerpoint

und ein Fortschrittsbalken, der anzeigt, wie viele Folien noch übrig sind.

Hilfe wäre grandios, Danke