Makro – die besten Beiträge

Hallo,

ich möchte an meiner Maus die Makro- Tasten nicht belegen sondern als extra Tasten verwenden. Also nicht mit einer Taste (z.B. "R") oder mit einer Kombination (z.B. "Strg + Z") belegen sondern als Zusatztaste die dann zum Beispiel als Makro 1 erkannt wird. Damit ich im Spiel unter den Einstellungen eine Funktion auf Makro 1 legen kann.

Ich hoffe ich konnte meine Frage verständlich schildern.

L.G. Nico

Wie kann ich die Zauber miteinander kombinieren dass beide Zauber aktiviert werden in diesem Makro ? Was muss davor dazwischen und dannach stehen, kann mir jemand mit den zaubern auf dem Bild ein Beispiel machen?

Hallo,

Ich habe in Excel in der Spalte E immer ein Datum im Format "tt.mm.jjjj". Anzahl der Zeilen ist variabel. Ich möchte ein Makro programmieren, welches mir die vergangenen Tage vom Datum bis heute ausrechnet und das Datum in der jeweiligen Zelle mit den berechneten Tagen überschreibt. Wenn größer 10, soll zudem rot markiert werden.

Kann mir jemand helfen? Hab das mit DateDiff probiert. Hat aber nicht hingehauen.

Danke !

Hallo, wie kann man z.B. mit einem Tablet bei Excel ein Makro erstellen, welches die Kamera App öffnet mit der man dann ein Foto aufnimmt und dieses dann als "Kommentar" in eine Entsprechende Zelle speichert?

Oder gibt es da außer dem noch eine Lösung?

Hallo zusammen,

ich hätte da folgendes Anliegen.

Ich versuche ein Makro ausführen, dass an einer bestimmten Stelle auf dem PC liegt und nur via Schnellzugriffsleiste eingebunden wurde. Da es allerdings so programmiert wurde, dass es immer nur für den aktuellen Tab (Arbeitsblatt) die Arbeiten ausführt, muss ich es jedes mal in jedem Arbeitsblatt neu ausführen, da aber in einer Arbeitsmappe gut und gerne auch mal 45 Arbeitsblätter gibt, ist das sehr mühselig, da es jedes mal 10sek oder mehr arbeitet und in der Zeit kann man nicht arbeiten.

Daher wäre es jetzt mein Ziel, ein zweites Makro zu programmieren, das dieses Makro ausführt, dann das Arbeitsblatt wechselt erneut ausführt usw. usf. bist zum letzten Arbeitsblatt.

Zum ermitteln des letzten Arbeitsblattes wollte ich unabhängig vom Namen des Arbeitsblattes diese über Worksheets(x).Select, bei welchen ich zuvor das letzte über ThisWorkbook.Worksheets().Count ermitteln.

Allerdings will das alles nicht so richtig funktionieren.

Kann mir einer helfen, wie ich dies bewerkstelligen könnte, es darf auf keinen Fall vom Namen abhängig sein, da diese pro Mappe anders sind.

Vielen Dank für die Hilfe im Voraus und die Ideen.

Hi,

Ich habe ein Angebot des Soligor AF Macro 100mm 3.5 in der Nähe gefunden, zwar gebraucht aber sehr gut und voll funktionstüchtig, anscheinend passend auf meine Kamera.

Da ich in die Makrofotografie einsteigen will, suche ich schon länger nach einem geeigneten Objektiv.

Ich habe momentan wirklich wenig Geld und dieses würde ca. 80€ kosten, was mir wirklich sehr gelegen käme.

Denkt ihr, es ist ein gutes Angebot? Würdet ihr es an meiner Stelle kaufen?

Alternativ gibt es für etwas mehr (85€) bei Amazon das neue Tamron AF017NII-700 AF 70-300mm 4-5,6 Di LD Macro objektiv, dafür bräuchte ich aber auch noch einen Adapter. Zusätzlich ist es kein reines Makro objektiv, sondern ein Teleobjektiv mit Makro 1:2 Funktion...

Was denkt ihr? Für welches Objektiv würdet ihr euch entscheiden? Oder habt ihr noch andere Tipps?

Lg ShuTo

Hallo,

ich habe in meiner Excel Arbeitsmappe in unterschiedlichen Tabellenblättern mehrere Pivots. Ich möchte allerdings, dass wenn ich in einer den Filter ändere, dass alle anderen auch automatisch aktualisiert werden. Ich kam bisher nur soweit, indem es sich aktualisiert, wenn ich den Reiter wechsel. Wie muss ich das ganze anpassen, dass es wie gewünscht funktioniert?

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
   Dim pt As PivotTable
   For Each pt In Sh.PivotTables
        pt.RefreshTable
   Next
End Sub

LG Syrena

Hallo,

ich habe eine ziemlich schwierige Aufgabe zu lösen, zumindest für mich als VBA Amateur und bräuchte deswegen eure Hilfe, da ich daran schon seit Tagen verzweifle.

Die Aufgabenstellung ist folgende:

Es soll durch ein Kontrollfenster (1. Bild links) möglich sein, einen neuen Datensatz anzulegen, der dann automatisch in der Tabelle (1. Bild rechts) davon erscheint. Die Erstellung der Datensätze soll fortlaufend geschehen, d.h. falls bereits ein Datensatz in Zeile 4 vorliegt, dass der neue Datensatz automatisch in Zeile 5 (usw.) angelegt wird. Zuletzt soll dann das Kontrollfenster geleert werden, sodass es theoretisch möglich wäre, direkt einen weiteren Datensatz anzulegen.

Weiterhin soll dieser neu angelegte Datensatz mit dem "DiagrammA" im Reiter "Diagramm" verknüpft werden (X/Y-Werte und Name in der Legende), sodass dort auch automatisch dieser Datensatz erscheint (2. & 3. Bild).

(Optional): Die Möglichkeit zum Entfernen eines Datensatzes.

Vielen Dank!

Mein konkrete Bedingung wäre: Wenn t in dieser Zeile die Bedingung, t=x*30 (wobei x ={Natürliche Zahl und 0}) erfüllt, soll die Zeile angezeigt werden, andernfalls nicht.

Ich benutze Excel 2016. Da ich mich mit derartigem nie Beschäftigt habe, wäre es toll wenn mir jemand helfen könnte.

MfG

Ich habe eine Excel-Tabelle. In dieser möchte ich bestimmte Werte durch ein Eintragen eines "x" in der selben Zeile löschen.

Ich nenne mal ein Beispiel:

Ich trage meine Werte in die Zellen B9, C9 und D9 ein. Nun will ich die Zellen B9, C9, D9 und E9 Löschen und trage in Zeile E9 ein "x" ein. Zellen sind jetzt leer, Zeile aber noch vorhanden (wegen der Daten in Spalte A).

Dasselbe könnte ich jetzt mit einer anderen Zeile machen, z.B. 42: Ich trage meine Werte in die Zellen B42, C42 und D42 ein. Nun will ich die Zellen B42, C42, D42 und E42 Löschen und trage in Zeile E42 ein "x" ein. Zellen sind jetzt leer, Zeile aber noch vorhanden (wegen der Daten in Spalte A).

Voraussetzungen:

• Werte stehen in den Zeilen 6-155

• das eingetragene "x" soll nur die entsprechenden Inhalte der selben Zeile löschen

• Inhalte stehen in Spalten "B", "C", "D"; "x" soll eingetragen werden in Spalte "E"

• gelöscht werden soll Inhalt aus "B" bis "E"

• Löschung entweder sofort nach Eintrag des "x" oder mit Klick auf Schaltfläche

Ich würde mich sehr freuen, wenn es jemand gibt der mir ein Makro dazu schreibt. Ich habe mich mit diesem Thema noch nicht besonders anfreunden können :)

Danke schonmal im Voraus!

Habe mir vor kurzem eine Sharkoon Skiller Pro+ zugelegt und gemerkt, dass z.B. die Makrotasten nur mit der mitgelieferten Gaming-Software funktionieren bzw eingestellt werden können. Das Problem dabei: auf der CD aus der verpackung befindet sich nur eine Schnellstartanleitung. Kann man die Software auch irgendwo anders runterladen (für Linux Mint, wie gesagt)?

Hallo liebe Leute,

Ich habe eine Excel-Tabelle mit 8 Spalten. In dem angehängten Bild ist ein Beispiel. Nun möchte ich gerne in der grünen Zeile einen Wert zu einer beliebigen Spalte eingeben. Dieser Wert liegt irgendwo zwischen zwei Werten der Tabelle in der jeweiligen Spalte. Dann soll Excel mir die restlichen Werte der übrigen Spalten in der grünen Zeile durch lineare Interpolation ermitteln. In der angehängten Datei ist dies für a=4,87 zum Beispiel gezeigt. Ich möchte nun aber auch mal d=16,66 eingeben können und die restlichen Werte für a-h bekommen.

Hat jemand eine Idee, wie ich das in Excel umsetzen könnte?

Vielen Dank euch allen und viele Grüße!

möchte immer das letzte Speicherdatum in der Kopfzeile. Habe bereits mehrere Lösungen gegoogelt, aber funktionieren tun sie nicht. Wo mache ich den Fehler?

Habe folgenden Befehl eingegeben

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim booIsSaved As Boolean
Dim strDatInfo As String
With ThisWorkbook
booIsSaved = .Saved
If .Path <> "" Then
strDatInfo = .BuiltinDocumentProperties("Last save time")
Else
strDatInfo = "noch nicht gespeichert"
End If
ActiveSheet.PageSetup.LeftHeader = "Zuletzt gespeichert: " & strDatInfo
.Saved = booIsSaved
End With
End Sub

Und hier noch einen printscreen. Besten Dank

Ich möchte gerne einige Dinge auf meinem android-Tablet automatisieren und möchte daher wie bei Excel Makros erstellen, damit automatisch Dinge passieren können. Aber wie geht das bei Android?

Guten Tag ,

Da ich mir viele Ideen für meinen Beruf aus dem Internet besorge , muss ich sehr oft "Grafiken speichern unter..." per Rechts-Klick machen, und so weiter .

Gibt es eine Möglichkeit einen Befehl zu erstellen wie ich mir selber eine sog.Makro erstelle ,sodass ich per tastendruck diesen Vorgang beschleunigere?

Hallo liebe Leute,

ich hoffe mir kann jemand weiterhelfen mit meinem Problem.

Ich habe folgendes Problem:

Ich habe in verschiedenen Worksheets Tabellen in denen ein Wert X steht oder Y.

Ich würde hierfür einen Durchlaufmakros benötigen der die Tabellen durchsucht und mir immer bei Wert X die ganze Zeile zb. von B1 bis M1 in die erste Arbeitsmappe kopiert.

Veranschaulichung:

Mappe1 Mappe2 Mappe 3 Mappe4

In Mappe1 befinden sich von B34:M81 leere Zellen in denen später die kopien kommen sollen.

In den restlichen Mappen soll die Spalte M auf Wert U abgefragt werden, ist dieser U sollen die davorliegenden Zellen A:J in den Bereich der ersten Mappe kopiert werden.

Ich hoffe mir kann jemand helfen.

Ich habe eine Excel Datei, die mittels Makro mit Werten befüllt wird.

Dasselbe Makro soll nun eine bestimmte Spalte der Datei durchlaufen und dann mittels Schleife alle TextBoxen der UserForm mit diesen Werten füllen.

Mein Versuch dazu:

  Dim i As Byte
  Dim currentName As String

For i = 1 To 10

    currentName = sheet.Cells(i, "H").Value
    

    UserForm1.Controls("TextBox" & CStr(i)).Value = currentName

Next

Funktioniert leider nicht. Muss ich bei der Initialisierung der UserForm oder der TextBoxen noch was beachten?

Fehlermeldung: Laufzeitfehler 91: Objektvariable oder With-Blockvariable nicht festgelegt.

Folgende Zeile wird markiert:

UserForm1.Controls("TextBox" & CStr(i)).Value = currentName

Hallo, ich habe verschiedene Tabellen, in denen sich durch Löschen einer Spalte Leerzeilen ergeben haben. Diese kann ich leider nicht per Makro löschen; es kommt eine Fehlermeldung wegen der vertikal verbundenen Zellen. Daher würde ich gerne die vertikal verbundenen Zellen trennen.

Etwas genauer vielleicht noch

Es bleiben zwei Spalten übrig.

Spalte 1 enthält keine verbundenen Zellen.

Spalte 2 enthält die verbundenen Zellen, die unterschiedlich vielen Zeilen in Spalte 1 entsprechen. Mal sind nur zwei Zeilen verbunden, mal 10.

Vielen tausend Dank für eure Hilfe!