Hallo zusammen,

ich hätte gerne eine dynamisch Fuß bzw. Kopfzeile und zwar handelt sich sich bei der Arbeitsmappe eine lange Liste von Störmeldungen ca. 32.000 Zeilen, diese werden mit der Funktion Filter() je nach Benutzer Anforderungen gefiltert, im Anschluss kann daraus ein PDF gemacht werden um das den entsprechenden Abteilungen zuzuweisen. Jetzt würde ich gerne in Kopfzeile reinschreiben, was die Kriterien des Filters waren, damit man es auf einen Blick sieht, diese setzten sich aus verschiedenen Dropdowns zusammen, normalerweise würde ich die einfach auslesen und in irgend einer Form verketten. Dinge wie ="Kategorie"&A4 funktionieren jedoch leider nicht.

Nein ein Datenbankprogramm wie Access oder Base kommt nicht in Frage, da andre Abhängigkeiten bestehen, die mit og. genannten Alternativen nicht gelöst werden können, außerdem ist dies Kundenanforderung, dass es MS Excel Kompatibel sein muss. Es muss damit gelöst werden Kundenvorgabe. Sieht hier einer eine Möglichkeit?

Vorab, ich bin nicht so gut im Umgang mit Excel und deshalb diese Frage. Sagen wir, ich möchte in Excel Datei 1 einen Wert jeden Monat eintragen welches sich in Excel20243009 befindet. Jeden Monat ändert sich aber das Datum zum nächsten Monatsende, die Werte ändern sich auch aber die Struktur bleibt gleich, d.h. nächstes mal braucht die Excel Datei 1 den Wert von Excel20243110 für den Oktober. Wie mache ich das? Welche Funktionen nutze ich hierfür?

=SUMME(B206:B395) (B614:B620)

Was kommt in die Lücke damit man alles zusammen addiert?

Weil zwischen diesen Zeilen kommen noch andere Zeilen und die sollen nicht mit addiert werden

Hallo.

Ich besitze eine Canon eos 400d + Tamron 28-200 1: 3.8-5.6 Makro 72mm Objektiv.

Kann mir jemand Makroverlängerungsringe empfehlen die auch für meine Kamera geeignet sind ?

Danke im Voraus.

Hey.

Habe eine Canon 400d mit standart Zoom lens EF-S 18-55mm. Kann jemand ein gutes Makro objektiv empfehlen. Neu oder gebraucht spielt keine Rolle. Am liebsten wäre mir das günstigste was aber gut ist bis hin zu teuer und sehr sehr gut.

Hey Leute,

ich arbeite derzeit intensiver an einer Excel-Tabelle, wodurch ich mich wahrscheinlich noch öfter mit Fragen rund um diese Tabelle melden werde, wenn ich mal nicht weiter weiß :D. Nun möchte ich diese Tabelle im nächsten Schritt mit Makros bereichern. Leider hatte ich bislang nahezu nichts mit Makros am Hut und benötige aus diesem Grund Hilfe.

Die dargestellte Tabelle bzw. der Ausschnitt soll zukünftig projektbezogen verwendet werden. Es handelt sich dabei um eine Funktionsliste, in der ich in Spalte B Bauteile auswähle, die ich in dem jeweiligen Projekt benötige. Da jedes Projekt individuell ist, habe ich in einigen Projekten mal 20 Bauteile, mal 50. Also nie ein im Voraus festgelegter Wert. Da in einem Projekt mehrere Anlagen vorhanden sein können, die jeweils so eine eigene Funktionsliste benötigen, möchte ich eine Schaltfläche implementieren, die mit einem Makro versehen ist. Durch Anklicken dieser Schaltfläche sollen Zeilen (nicht nur die Inhalte, sondern die gesamte Zeile) in einem bestimmten Bereich (vom dritten Bauteil bis zum letzten Bauteil) gelöscht werden. In dem Bildbeispiel z.B. würde ich wollen, dass die Zeilen 11 bis 17 gelöscht werden. Da es in einem anderen Projekt aber z.B. 20 Bauteile geben kann, müsste ich Zeile 11 bis 30 löschen. Die Ergebniszeile ganz am Ende ist unabhängig von der Tabelle und soll immer bestehen bleiben. Kann mir jemand bei dem Code helfen, um so ein "dynamisches Löschen" durch eine Schaltfläche zu ermöglichen? Unabhängig davon, wie viele Bauteile ich auswähle, soll immer nur bis zum letzten Bauteil gelöscht werden. :)

Was haltet ihr von diesem Bild? Macht es einen guten Eindruck? Ich musste leider die Auflösung runterschrauben, um es hier einstellen zu können, daher hat es nicht die maximale Schärfe. Ich habe es mit meiner Canon EOS 80D mit dem Canon EF 100mm L Macro geschossen (1/1250, f13, ISO400 + Blitz). Habt ihr Tipps, was ich in Zukunft besser machen könnte/Erfahrungswerte auf dem Gebiet, die weiterhelfen, wenn ich in Zukunft gute Bilder schießen möchte?

Hallo zusammen

Ich muss momentan bei der Arbeit ein Formular neu erstellen. Dabei sollte ich in einer Zelle eine Dropdown Auswahl einfügen. Dies kann ich bereits, aber je nachdem was man in diesem Feld auswählt, zum Beispiel A oder B, sollte in einer anderen Zelle ein Text erscheinen wenn man A auswählt aber diese Zelle leer sein wenn man B auswählt.

Kann mir hierbei jemand helfen? Muss ich mit Makros arbeiten, wenn ja bitte erklären mit welcher Funktion. Register Entwicklertools habe ich freigeschaltet und ein bisschen experimentiert, aber leider nicht funktioniert.

Besten Dank für eure Mithilfe.

Hallo zusammen,

ist es möglich, dass man .tdms Dateien in einer geöffneten Exceldatei öffnet.

Bisher bekomme ich das nur hin, dass wenn ich eine .tdms Datei öffne, dass sich eine neue Excel-Mappe öffnet. Das möchte ich aber nicht.

Als Beispiel: Ich habe schon Werte auf einem Arbeitsblatt stehen und möchte die Werte der .tdms Datei in der selben Exceldatei haben. Dann möchte ich vielleicht auch durch ein Makro oder so die .tdms Datei öffnen können, und diese wird dann zum Beispiel auf einem zweiten Arbeitsblatt angezeigt.

Vielen Dank schon mal für eure Antworten

Viele Grüße

Hallo,

gucke mir morgen ein 70-300mm (tamron tele-Makro) würde das reichen um den Mond zu fotografieren oder brauch ich ein längeres?

Ist so ein Makro möglich?

1. Tastendruck Wilder Biss
2. Tastendruck Nachwachsen

Wenn der Freizauberzustand nicht proccen sollte, dass dann nicht die Katzengestalt verlassen wird beim 2. Tastendruck, also dass dann sozusagen nichts passiert. Und dann wieder zum 1. Tastendruck zurückspringt?

Ich würde gerne aus der Hand ohne Stativ stacken lernen, kann mir jemand Tipps dafür geben? Und wie gestaltet sich das bei bewegenden Insekten?

Dazu hab ich gelesen, dass Helicon Focus ein sehr gutes Programm sein soll für das stapeln der Bilder im Nachhinein.

Ich habe folgendes Problem in Excel:

Zur Datenanalyse in der Arbeit bekomme ich regelmäßig einen exportierten Exceldatensatz zur Verfügung. Das Ganze ist natürlich viel komplizierter, aber vom Prinzip her sieht das so aus:

Die Exceltabelle enthält Daten, die sich in den Spalten A,B,C und D befinden. Die Anzahl der Zeilen, die mit Daten gefüllt sind, ist aber variabel.

Zur Analyse der Daten will ich nun jedes Mal zwei zusätzliche Spalten (eine z.B. nach A und eine nach C) einfügen. Die Daten in diesen Spalten sollen aus den anderen Spalten errechnet werden, z.B. soll gelten "F=3+8*A" (konkret natürlich dann mit der jeweiligen Zeilennummer dazu, also "F1=3+8*A1", "F2=3+8*A2",..., aber das ist einfach, da muss man die Formel ja nur "runterziehen") usw. Die Formel ist dabei auch jedes Mal dieselbe.

Wie lässt sich das in Excel am einfachsten erreichen, ohne das jedes Mal händisch zu machen? Mutmaßlich mit Makros? Oder irgendwie anders? Bisher habe ich mit Makros noch keinerlei Erfahrung gesammelt.

Sollte noch was unklar sein, gerne rückfragen.

Ich brauche Makrolinsen, die in etwa einer 60x Vergrößerung einer Lupe entsprechen.

Sind diese passend ?

https://www.walimex.biz/Walimex-Close-up-Makrolinsen-Set-55-mm?AdsPMax=DE&gad_source=1&gclid=Cj0KCQjw8pKxBhD_ARIsAPrG45m54C5a4iLEf-LD0khoZTl2F1zfxSa4ehe_pYL-xuUWfvKt7b79UKkaAiocEALw_wcB

Leider steht dort nur, dass die Wirkungsweise einer Lupe entspricht.

wenn ihr die Möglichkeit hättet, zeitlich, familiär, finanziell?

Hallo zusammen, können Sie mir hier weiterhelfen?

Ich habe hier ein sehr großer Report (auf tägliche Basis) und ich möchte gerne die Posten die ich brauche per Makro in eine extra Tabelle haben.

Die Posten die man benötigt sind immer in unterschiedlichen Zellen vorhanden.

Beschreibung: suchen/Report ID 9999999 und alles was dazwischen ist bis zum END Report in extra Datei kopieren und so weiter/suchen Report ID 9999999 …...(siehe Bild) Vielen Dank im Voraus!!!

Wir planen eine Überarbeitung unserer Materialnummern. Zu diesem Zweck müssen in SAP immer wieder folgende Tastenkombinationen ausgeführt werden:

1. STRG + A
2. STRG + V
3. ENTER
4. Pause von ca. 15 Sekunden, bevor die nächste Nummer automatisch geladen wird

Gibt es eine Möglichkeit, das zu automatisieren? Ja, ich weiß, in SAP gibt es einen Makrorekorder. Dieser greift aber nicht an besagter Stelle. Der Rest läuft bereits darüber.

Leider lässt unsere IT keine Zusatzsoftware zu, weshalb wir auf Windows Möglichkeiten, oder mechanische Lösungen (Tastatur Roboter(?)) angewiesen sind.

Hat hier jemand eine Idee?

Hey ich habe eine neue tastatur die razer blackwidow v3 mini hyperspeed und habe eltzens fn und z gedrückt wodurch anscheinend der makro modus anging jetzt leuchten alle tasten die ich drücke grün außer die z taste die leuchtet rot, wenn ich den makromodus deaktiviere also die zahlenkombi erneut drücke kann ich sowohl w als auch z nicht mehr drücken, hat jemand tipss wie meine tastatur normal leuchtet und meine w und z tasten funktionieren.

Lg Nick

Und wenn ja, auch schon wenn man das Dokument runterläd oder erst wenn man das Dokument öffnet?

Heyo, wenn ich zocke, zb Valorant und mich in Discord muten möchte, funktioniert mein shortcut nicht, wenn ich raustabbe funktioniert mein shortcut.
wenn ich mich in OBS stummschalten möchte, funktioniert die tastenkombination.
Screenshots mit "druck"-taste funktionieren auch nicht, außer ich tabbe vorher raus.

kennt jemand noch lösungen? die ersten 5 suchergebnisse hab ich schon getestet. aber schreibt gern noch mal alles mögliche rein.
Discord hab ich schon neu installiert + keybinds rebinded.

glaub nicht dass discord das problem ist, sondern eher, dass tastenkombinationen vom "spielmodus" verhindert werden. finde dazu aber nichts....

Wie kann ich in einer Tabelle, wenn ich zwei Werte habe, einen löschen und beim anderen dazuschreiben, dass es 2 sind?

Ungefähr so:

Hey suche wen der mir bei einem Makro helfen könnte für die Logitech App verstehe die delays nicht

Hallo ich habe mal das HyperV (mit Windows 11) ausprobiert und wollte dort nun Google Play Spiele für PC installieren um dort dann im Hintergrund Macros laufen zu lassen. Allerdings kommt immer dass hier:

(Außerdem ruckelt der Sound immer)
(In der VM) alle Updates installiert

Kennt ihr Problemlösungen?

Guten Tag zusammen,

Undzwar geht es darum das ich ein Makro erstellt habe der sieht so aus :

Sub Makro1()

' Makro1 Makro

'

  Range("D3").Select

  Application.CutCopyMode = False

  Selection.Copy

  Sheets("1M").Select

  Range("C6").Select

  ActiveSheet.Paste

  Sheets("Tabelle1").Select

  Range("J3").Select

  Application.CutCopyMode = False

  Selection.Copy

  Sheets("1M").Select

  Range("C7").Select

  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

    :=False, Transpose:=False

  Sheets("Tabelle1").Select

  Range("R3").Select

  Application.CutCopyMode = False

  Selection.Copy

  Sheets("1M").Select

  Range("C13").Select

  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

    :=False, Transpose:=False

  Range("D26").Select

  Application.CutCopyMode = False

  Selection.Copy

  Sheets("Tabelle1").Select

  Range("H3").Select

  Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _

    :=False, Transpose:=False

End Sub

Das Problem ist jetzt das ich möchte das er in der Excel Tabelle jede Zeile mit diesem Makro ausfüllt sprich er soll bei Zeile 3 anfangen und bis 322 weiterführen ich habe 2 Mappen 1. "Tabelle1" und "1M"

Tabelle1 hatt die 322 Zeilen aber er springt nicht zur jeder Zeile und die Zelle "D3" , "J3", "R3", "H3" sollten dann auf die nächste Zeile Springen Sprich "D4", "J4" , "R3" , "H4" wenn er auch in der 4 Zeile ist

die restlichen Zellen sollen festbleiben zugehörig zu Mappe "1M"

ich hoffe es ist verständlich was ich meinte :'D

Hallo zusammen,

ich habe eine Datei in der in mehreren Spalten verschiedene Daten angegeben sind.

nun hab ich eine Vorlage und frage mich ob ich die Daten händisch oder auch per Makro manuell eingeben kann?

sprich von einer Datei in eine andere Datei, Pro Zeile, dementsprechend müssten es für 100 Zeilen, 100 Excel Dateien sein.

(wenn es ausschließlich über Arbeitsblätter geht wäre das für mich auch noch in Ordnung)

geht das irgendwie automatisch?

grüße

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, ich wollte mal Fragen wie man ein Makro erstellt zum Beispiel für die "F" Taste. Wie kann ich das so einstellen, dass die "F" Taste extrem schnell und oft wiederholt wird? Ich habe eine ASUS Tastatur

Ich habe eine Kamera und es funktioniert alles gut, aber jedes Mal, wenn ich den Blitz anschalten will steht da „kein Blitz im Makro Modus“ Help

Ich Habe mir heute Macro Rekorder (kostenlose version) heruntergeladen und wollte ein Macro erstellen an sich geht alles außer wenn ich ihm z.B. sage Taste "E" drücken macht er das nicht also er ignoriert alle zu drückenden tasten warum??

es nerft mich ka hab nix dazu online gefunden

Moin zusammen.

Ich zeige euch erst einmal, was ich bisher habe:

Und zwar möchte ich, dass wenn ich bspw. auf "SW - in Bearbeitung" klicke, es um eins hoch zählt, was jetzt ja auch schon der Fall ist.

Nun möchte ich aber, dass wenn ich auf "SW - Fertig klicke", nicht nur die Zahl da um eins hoch geht, sondern auch noch, dass E4 (also SW - in Bearbeitung) wieder um eins runter geht.

Hierzu nochmal meine bisherigen Makros:

Wie muss ich da was genau umstellen, um das umsetzen zu können?

Wie immer, danke ich euch schon im Voraus. :)

Moin.

Ich brauche mal die Hilfe von einem Excel-Experten.

Hab es mithilfe von Google zwar geschafft ein Makro zu erstellen, dass ich, wenn ich auf den Button klicke er in Zelle "B2" zählt, allerdings geht es nur bis 1.

Und ich würde es gern ohne Begrenzung haben. Also wenn man 2x klickt, dass da ne 2 steht, wenn man 3x klickt ne 3 usw.

Was müsste ich denn dafür ändern?

Ich selbst hab ja keine Ahnung und das Ding nur so aus Google übernommen und n bisschen rumgespielt bis die Zelle B2 aktiv ist. Jetzt muss nur noch diese blöde Begrenzung weg.

Ich danke euch für eure Hilfe- =)

Moin liebe Excel Experten, ich bräuchte mal eure Hilfe.

Und zwar will ich ein Makro erstellen, dass folgendes bewirkt.

Ich will bspw. in Zelle A4 drauf klicken und das System soll dann in Zellen V4 pro Klick immer +1 rechnen.

Das will ich dann natürlich auch für A5, A6, A7 und so weiter.

Kann mir da einer ne Lösung anbieten?

Falls ja, bedanke ich mich schon vorab, ihr würdet mir damit sehr helfen! 🙏🏻

was bedeutet Makros? Ich habe das hier gelesen: „Eine ausgewogene Mahlzeit mit allen Makros ist dann ideal.“ und wundere mich was das bedeutet und ob es wichtig ist?

Hallo,

Meistens, wenn ich eine Datei eines Microsoft 365 Programms auf meinem Windows 11 PC öffne, z. B. Word, erscheint unter der Originaldatei im Ordner eine Datei mit blasserem Logo und Namen mit "~$" vor dem Namen der ursprünglichen Datei. Wenn ich die geöffnete Originaldatei dann schließe, verschwindet die blasse Datei mit dem Anfang "~$" wieder. Was ist das und ist das normal?

Danke für schnelle Antworten.

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,

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

Moinmoin, ich suche eine Passende Anwendung mit der ich ein Mausmakro einrichten kann.

Soll folgendermaßen funktionieren: Immer wenn ein Linksklick gemacht wird, soll sofort ein Rechtsklick mit einer gewissen Verzögerung geschehen. Das Makro soll über einen Hotkey ein und ausschaltbar sein, die Verzögerung im besten Fall anpassbar.

Habe leider noch nichts passendes gefunden. Vielleicht kennt sich jemand aus und kennt ein passendes Program.

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?

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 :)

Hallo zusammen,

Ich habe ein Problem mit Makros in Excel.

Meine Tabelle beinhaltet mehrere Spalten, die durch einen VBA-Code Mehrfachauswahl in Dropdown-Listen möglich machen.

Zur Benutzerfreundlichkeit habe ich versucht über Schaltflächen, denen ich Makros zugewiesen habe, Filter einzubauen.

Die Makros habe ich nicht geschrieben, sondern versucht über die Aufzeichnungsfunktion zu definieren.

Die Filter funktionieren aber leider nicht wirklich.

Das Problem ist, dass wenn ich in der Spalte "Themen" versuche über die Schaltfläche "Kommunikation" zu filtern, werden mir Zeilen angezeigt in der nur "Kommunikation" steht, aber nicht z.B. "Kommunikation", "Qualität" oder "Kommunikation", "Kosten", "Sonstige".

Kennt sich hiermit jemand aus?

Hallo zusammen,

Ich habe ein Excel-Dokument mit mehreren Markos und einem visual basic for applications-Code für mein Unternehmen erstellt. Dadurch, dass auf dieses Dokument alle Abteilungen zugreifen können müssen, wird es in einem Dokumentenablagesystem abgelegt. Ich habe es schon als "Microsoft Excel-Arbeitsblatt mit Makros" gespeichert. Trotzdem sind die Makros und der VBA-Code für alle anderen nach Öffnen nicht aktiv. Kennt hier jemand einen Trick?

Danke!

Guten Tag,

Würde dieses Setup mit dem Raynox DCR 250 funktionieren?

Hallo zuammen,

Ich habe mir für einen Sanitätsdient mit Excel ein kleines Tool gebaut um ein Einsatztagebuch zur Dokumentation zu führen.

In der linken hälfte tauchen durch Ausführen der Farbigen Schaltflächen bestimmte kurz Meldungen auf, wie abgebildet.

Ich möchte in der Spalte D einen automatischen Zeilenumbruch, ohne das sich die Position der verschiedenen Farbigen Schaltflächen und Überschriften der Schaltflächen ändert. Das ganze kann auch gerne Zellen unabhänig sein. Hat jemand eine Idee?

Grüße und Danke im vorraus

Hallo, ich brauche ein makro objektiv für die Canon EOS m50 es hat einen ef-m Anschluss und einen APS-C Sensor. In welchen preislichen gebiet wäte man dort? Welche mm Anzahl ist für Makro Fotografie gut? Hat jemand empfehlungen? Danke im voraus

Hallo

Im Anhang sind die beiden Tabellen zu sehen. Der gelbe Inhalt

soll in die Lücken unter das jeweilige stichwort in der 2. Tabelle gelangen.

Hat Jemand eine Idee, wie das geht, ob makro oder Befehl ist egal.

( Hab es per Makro und sverweis versucht und in beiden Fällen ging es leider nicht auf)

Außerdem wird es ca 32. Seiten der 1. Tabelle geben und somit auch 32 Zeilen in Tabelle 2.

Ich freue mich über jede Hilfe und Rückfrage.

Danke

Hi Leute,

zuerst einmal muss ich loswerden, dass ich verzweifle, aber glaube dass irgendetwas winzig kleines der Fehler ist....

Situation:

Ich möchte einen Button erstellen, der nur eingeblendet wird, wenn Zellen X,Y,Z, usw. ausgefüllt sind.

Wenn er dann eingeblendet ist, soll er das Makro "Meldung_Absenden" ausführen.

STAND JETZT: Funktioniert alles, bis auf das Ausführen des Makros. Der Button wird richtig ausgeblendet, wenn die Felder nicht ausgefüllt sind. Sobald alle felder ausgefüllt sind, kommt der Fehler: 1004 "Anwendungs- oder Objektdefinierter Fehler"

Ich finde den Fehler im Code nicht. Der Button "CommandButton1" ist ein ActiveX Steuerelement.

Mein Testbutton "Meldung absenden" ist ein Formularsteuerelement. Damit lässt sich das Makro auslösen. Ich will aber nicht, dass eine Meldung abgegeben werden kann, wenn nicht alle Felder ausgefüllt werden.

Könnt ihr mir da helfen? Bei nachfragen stehe ich gerne zur Verfügung.

Ich habe 53 tabellen diese soll jeder sehen können bearbeiten allerdings erst nach Passwort Eingabe

wie kriege ich das hin das ich alle Tabellen per Button freischalten kann und alle per Button schützen kann nochbesser wäre das alle automatisch geschützt werden wenn ich excel schließe

wichtig ist das ich da dann nicht für alle Tabellen das Passwort eingeben muss sondern nur einmal sprich da müsste irgendwo eine if Anfrage rein wenn ich es richtig erkenne

hoffe auf viele Vorschläge :)

Hallo, wie kann ich folgenden XLookup als Makro schreiben

=VLOOKUP(A4;EKPO!$A$1:$C$1000;2;FALSE)

A5 soll dabei eine ortlaufende Nummer sein (dafür habe ich bereits eine Variable Zaehler)

Das Ergebnis des Sverweis soll dann hierrein  

Ansicht.Cells(Zeilenindex, 3)

ich bekomme immer wieder verschiedenst Fehlermeldungen

Mein Code:

Ansicht.Cells(Zeilenindex, 3) = WorksheetFunction.VLookup(test, Worksheets("EKPO").Range("A:B"), 2, False)
  

Hallo,

Ich kann in Excel auf ein Button ein Makro legen.

Kann man in Excel auch eine Formel mit dem Makro Button arbeiten.

z.B. (Bild)

ich möchte gerne dass wenn ich die Schaltfläche Stracciatella drücke, dass im Gelben Feld eine 1 steht, wenn ich diese Schaltfläche nochmals drücke, dann steht dort die Zahl 2 usw.

Geht dies überhaupt mit Bordmitteln? Ohne VBA?

Danke

Hallo gutefrage Team,

ich müsste einen VBA-Code abwandeln der so noch nicht passt/funktioniert.

Ich muss aus 12 Tabellen Texte in die 13 Tabelle einfügen ohne Leerzeilen.

Tabelle 1 Texte von A45:47

Tabelle 2 Texte von A35:37; 68:80; 105:117; 141:155; 178:196

Tabelle 3 - 7 Texte von A40:45; 85:90; 130:135; 175:180

Tabelle 8 A42:44

Tabelle 9 A44:48

Tabelle 10 A37:40

Tabelle 11 A27:48

Tabelle 12 A27:31

Die Zusammenfassung sollte untereinander in Tabelle 13 ab A95 eingefügt werden und die Zeilen in denen kein Text ist sollten nicht kopiert werden.

Sub Tabellentext_zusammenfassen()

Dim i As Integer

Dim Zusammenfassen As Worksheet

Set Zusammenfassen = Worksheets("Zusammenfassung")

For i = 1 To Workshheet.Count

Set BereichZielTab = Worksheets(i).UsedRange

Set LetzteZeileZusammenfassung = Worksheets(1).Cells(Rows.Count, "A45:47").End(xlUp)

BereichZielTab.Copy Destination:=LetzteZeileZusammenfassung

Next i

End Sub

Danke Vorab

Ich habe 2 werte einmal 0 und 1.

Die Werte werden zufällig per Funktion generiert.

Wenn nun beispielsweiße in der Zelle A1 der Wert 1 steht soll die Arbeitsmappe so oft aktualisiert werden bis in der Zelle A1 der Wert 0 steht.

Gibt's dafür irgendeine Formel oder einen Makro den ich dafür verwenden kann ?kenne mich nicht wirklich mit Excel aus wollte nur mal was ausprobieren :)

Freue mich auf eure Antworten :D

Grüße Lars

Hallo liebe Freunde,

brauche eine Formel die mir in Tabelle 4 die Zahl in AK27:AK37 kopiert wenn dort eine Zahl >1 geschrieben wird und diese Zahl in der Tabelle 4 M27:M27 einfügt (AK27 in M27, AK28 in M28....).

In AK27:AK27 habe ich eine andere Formel für eine Funktion. =SUMMEWENNS(V27:X27;V25:X25;">0")

In M27 soll keine Formel sein da ich manchmal etwas von Hand eintragen muss.

Danke mfg. Dr.

Ich habe eine Tabelle mit Filmen und weiteren Details. Jetzt möchte ich jedoch ein Inhaltsverzeichnis erstellen, wo der Name mit einem Link hinterlegt ist, der direkt zu dem Film führt.

Wie gestalte ich soetwas möglichst einfach? Makros scheinen mir hier zu schwer zu sein.

Hallo erstmal,
Also ich habe einen Arbeitszeitrechner erstellt um die Wochenstunden im Blick zu haben. Ich würde gerne eine Makro erstellen wie ich mein Arbeitszeitrechener auf Sollzeit zurücksetze, dies funktioniert auch echt perfekt*, aber mit den Pull Down kriege ich es einfach nicht hin dass er Montag bis Donnerstag im Pull auswählt 00:30 und am Freitag 00:00.

Wie kann ich die E Spalte mit Pull down von einer Makroausfüllen?

*Als Erklärung D3-D7 auf 8Uhr, D8-D9 auf 0Uhr, F Spalte wird auf die Sollarbeitszeit ausgefüllt F3: 16:39 Uhr, F4-F6: 17:09 F7:14:00

Hallo zusammen -

ich versuche es kurz zu machen. Ich habe x tausend Excel Zeilen alphanumerisch befüllt. z.B.

123623125B

3W8895123K

Gibt es eine Formel, die mir Leerzeichen innerhalb des alphanumerischen befüllt.

Das Ergebnis sollte z.B. so sein:

123 623 125 B

3W8 895 123 K

Vielleicht kann mir jemand weiterhelfen.

Vielen Dank im Voraus.

Hey,

ich habe momentan eine Tabelle welche im seitlichen Vormat ist, also jeder Wert steht nebeneinander in Spalten. Also Kategorie Name, Datum, Persönliche Nummer, Aufgabe…

Bei Export möchte ich gerne jede Zeile als Block untereinander haben sodass jeder Person einen Block hat und zwischen jedem Block eine Spalte frei.

Kann mir hier jemand weiterhelfen.

Vielen Danke

Hallo,

ich bräuchte ein Makro, das so funktioniert, dass ich nur eine Taste gedrückt halten muss und damit immer: "TAB - 1 - 1 Sek warten - TAB - 1 ...." usw. ausgelöst wird, während ich in einem Spiel bin. Wie mache ich so etwas?

Hallo,

ich lerne gerade VBA bei Excel und dabei habe ich ein Problem. Ich hab zur Probe in das Modul folgenden Code eingegeben:

Sub DatenTyp1()

  Dim MeinText As String   

  MeinText = "Test"

End Sub

Wenn man das "Einzelschritt" aktiviert und mit dem Cursor über "MeinText" geht sollte dann doch: MeinText = "Test"

stehen, oder?

Bei mir steht jedoch nur: MeinText = ""

Muss ich da noch irgendwas einstellen, damit es funktioniert oder was mach ich falsch?

Hallo liebe Community,

mein Problem konkret ist das ich mein Script von „Mappe1“ aus starte. Das Skript selbst führt Buchungen in SAP durch. Am Ende des SAP Vorgangs wird eine Tabelle aus SAP exportiert, nennen wir die neue excel „Mappe2“. Diese ist aber nirgendwo gespeichert oder so.

Wie also kann ich nun von meinem Skript aus „Mappe1“, auf die neue Mappe, „Mappe2“ zugreifen und Beispielsweise Zellen und Spalten markieren oder einfach speichern?

Ich hoffe ich konnte euch die Problematik gut erklären. Ich kann zwar Programmieren, aber habe von Vba kaum Erfahrung.

Ich spiele eigentlich nur mit den ersten 3 Reihen, damit habe ich (nur wenn ich leicht jitter) höchstens 15CPS auf Gomme mit BLC. Spiele nächste Woche ein CW und da hat ja sowieso jeder richtig an und ich hab ewig keins mehr gespielt. Ist dieser AC so zu hoch? Hab diese Settings heute getestet mit jemandem der Augustus hat und Klickgrad etc und mit diesem AC auf dem Bild war ein krasser Unterschied zu meinem normalen und ich hatte 0 Knockback aber mein Freund auch nicht. Hab damit auf Gomme und BLC fast 18 CPS also die Grenze.

Ist der zu obvious oder kann man das für einen CW usen? Will halt nicht gebannt werden deswegen benutze ich nur Makros

Hallo Zusammen,

Ich will mittels VBA ein Excel modifizieren, damit möglichst wenige Tabellenblätter angezeigt werden. In einem Tabellenblatt (z.B. "Auswahl") habe ich die Zellen C62, C88 und C114, die jeweils ein spezielles Tabellenblatt anzeigen sollen. Jedoch gibt es im Moment nur LZF-Meldungen.

Es soll jeweils bei "Yes" nichts angezeigt, bei "No" die entsprechende Tabelle eingeblendet werden.

Ansonsten sollen die "nicht betroffenen" Tabellen ausgeblendet bleiben

Hier der Code im Worksheet "DieseArbeitsmappe":

Private Sub Worksheet_Open()

'Beim Öffnen des Excels die betroffenen Blätter ausblenden
    ThisWorkbook.Worksheets("Tabelle4").Visible = False 
    ThisWorkbook.Worksheets("Tabelle5").Visible = False
    ThisWorkbook.Worksheets("Tabelle6").Visible = False
    
End Sub

In Blatt "Auswahl" (Tabelle7) habe ich folgenden Code:

Private Sub Worksheet_Change(ByVal Target As Range)

   

‘Hier sind vorher noch andere IF-Regeln hinterlegt, die nur Reihen in Tabelle7 ein/ausblenden

   

    If Range("C62").Value = "No" Then 'Tabellenblätter einblenden, sobald in der jeweiligen Zelle "No" ausgewählt wird

        ThisWorkbook.Worksheets("Tabelle6").Visible = True

       

        Else

        ThisWorkbook.Worksheets("Tabelle6").Visible = False ‘Hier erhalte ich jeweils ein LZF 9?

    End If

   

    If Range("C88").Value = "No" Then

        ThisWorkbook.Worksheets("Tabelle5").Visible = True

       

        Else

        ThisWorkbook.Worksheets("Tabelle5").Visible = False ‘Hier erhalte ich jeweils ein LZF 9?

    End If

   

    If Range("C114").Value = "No" Then

        ThisWorkbook.Worksheets("Tabelle4").Visible = True

       

        Else

        ThisWorkbook.Worksheets("Tabelle4").Visible = False ‘Hier erhalte ich jeweils ein LZF 9?

    End If

   

End Sub

Weshalb gibt es jeweils einen Fehler und wie kann ich diesen am einfachsten beheben?

Vielen Dank, Michael

Hallo,

ich habe ein simples Excel Makro aufgenommen, in der ich eine Tabelle nach bestimmten Kriterien Filtern muss. Die Tabelle kann variabel lang sein.

Durch die Funktion "Makro aufzeichnen" habe ich folgendes:

"ActiveSheet.Range("$A$1:$S$249").AutoFilter Field:=15, Criteria1:="0""

Wie kann ich die Zeilenlänge durch eine Variable ersetzen? Die Länge der Tabelle würde ich einfach durch:

X = (Range("A2").End(xlDown).Row)

ermitteln.

Bitte um Entschuldigung für die Frage, ich schreibe nur sehr selten Makros.

Vielen Dank für eure Hilfe. :)

Hallo liebe Community,

ich habe diverse Makros in meiner Excel Datei und ich würde gerne das ganze etwas "smarter" gestalten und eine Art Datenbank mit VBA erstellen, um viele Sachen in der Arbeitsmappe dadurch ändern/pflegen zu können. Externe Leute sollen und müssen dann nicht mehr in die VBA Oberfläche und mühsam das Makro suchen, um dort Pfade oder Zeilen zu ändern, falls sich was ändert.

Meine Frage:

Ist es möglich in ein Makro bei VBA eine Art Variable einzubauen bzw. Pfad, wo Excel z.B. in Tabelle1 in Spalte A1 den Wert/Namen findet?

Beispiel Makro:

Statt Daten123.xlsx soll dann ein Bezug hin, wo Excel in Tabelle1 in A1 den Namen Daten123.xlsx findet. Ist sowas möglich?

Dim sPfad As String
Dim wbQuelle As Workbook
Dim zelle As Range
Dim loletzte As Long

sPfad = "C:\Users\P\Desktop\Dateiordner\Unterordner\Daten123.xlsx"

If Dir(sPfad) <> "" Then

Set wbQuelle = Workbooks.Open(sPfad)

Call Test

loletzte = Cells(Rows.Count, 1).End(xlUp).Row

wbQuelle.Worksheets(1).Range("A7:I" & loletzte).Copy ThisWorkbook.Worksheets(3).Range("B2")

wbQuelle.Close savechanges:=False

End If

Datenquelle Tabellenblatt

Ausgabe Tabellenblatt

Ich habe eine Wenn-Formel, die in 4 Zeilen untereinander 4 Werte eines anderen Blattes aus 4 nebeneinander liegenden Spalten der selben Zeile ausgibt. Diese 4 Formeln sollen dann für die nächste Zeile durchgeführt werden. Ich habe jetzt vier separate Formeln angelegt und diese nach unten gezogen. Dabei vergrößert sich der Abstand der nächsten Zeilenabfrage jedoch auch um 4.

Kann ich eine Art Schleife bauen, in der nach 4 Zeilen der abgefragte Zeilenwert um 1 erhöht wird. Also:

=WENN(Tabelle2!$G3<>0; Tabelle2!$D3;"")

=WENN(Tabelle2!$H3<>0; Tabelle2!$D3;"")

=WENN(Tabelle2!$I3<>0; Tabelle2!$D3;"")

=WENN(Tabelle2!$J3<>0; Tabelle2!$D3;"")

=WENN(Tabelle2!$G4<>0; Tabelle2!$D4;"")

=WENN(Tabelle2!$H4<>0; Tabelle2!$D4;"")

=WENN(Tabelle2!$I4<>0; Tabelle2!$D4;"")

=WENN(Tabelle2!$J4<>0; Tabelle2!$D4;"")

Vielen Dank für die Unterstützung!

Liebe Community,

ich bräuchte erneut eure Hilfe. :)

Aktuell lade ich täglich eine Excel Tabelle in meine Excel Vorlage hoch. Dort wird diese verarbeitet, wie z.B. sortiert usw.

Leider gibt es in der Spalte D oft mehrere Werte. Kann man diese mit VBA und Makro herausfiltern und eine neue Zeile damit befüllen? Wie ich das genau meine, siehe Screenshot.

Ich habe mir gedacht, dass man Excel hier mitteilt, dass in der Spalte D, wenn nur ein Wert mit einer Zeichenlänge von 6 Buchstaben hat, dass er dann nichts macht.

Beispiel nur Lag14 oder Lag7

Ist die Zeichenlänge länger als 6, dann soll er prüfen ob diese 15 Zeichen beträgt. Wenn ja, dann soll er den Wert zwischen 6 und 15 abschneiden und kopieren und im Anschluss in eine neue Zeile kopieren. Die anderen Spalten bleiben identisch. Eine Art Kopie sozusagen.

Beispiel für Lag/22 - Lag/51

Und dann noch das Gleiche für das Beispiel Lag/22 - Lag/51 - Lag/71

Liebe Community,

ich habe folgendes Macro in meiner Excel Tabelle. Es funktioniert auch wunderbar, bis auf die Tatsache, dass dort der Tabellenbereich aus der fremden Excel-Datei definiert ist.

Leider sind es nicht immer 239 Zeilen. Mal mehr und mal weniger. Dass es bei A7 anfängt, das stimmt schon. Wie müsste ich die Formel ändern, damit Excel sich automatisch anpasst?

Vielen lieben Dank im Voraus!

Es handelt sich um diese Zeile wbQuelle.Worksheets(1).Range("A7:I239").Copy

Sub Quelle()

Dim sPfad As String
Dim wbQuelle As Workbook
Dim zelle As Range

sPfad = "C:\Users\Beispiel\Desktop\Irgendeine Datei\Daten\Daten.xlsx"

If Dir(sPfad) <> "" Then

Set wbQuelle = Workbooks.Open(sPfad)

wbQuelle.Worksheets(1).Range("A7:I239").Copy ThisWorkbook.Worksheets(3).Range("B2")

wbQuelle.Close savechanges:=False

End If

End Sub

Wie aktiviere ich Makros? Die Tutorials auf Youtube funktionieren nicht

LG

Hallo zusammen

Ich würde gerne ein Makro ausführen, immer wenn ich das Tabellenblatt wechsle.

Also wenn ich bspw. von Tabelle1 in Tabelle2 wechsel, soll das Makro ausgeführt werden

Bis jetzt habe ich nur eine Möglichkeit gefunden, bei der bei jedem Zelleneintrag das Makroausgeführt wird. Das ist viel zu häufig und macht alles langsam. Super wäre es, wenn es erst beim WEchsel der Tabelle stattfindet.:

mein bisheriges:

Private Sub Worksheet_Change(ByVal Target As Range)

Hallo,

was müsste ich hier anpassen? Ich komme mit der Fehler Meldung nicht zurecht.

Private Declare 36 GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Function GetNTUserA() As String
  
 Dim sBuffer As String
 Dim LSize As Long
 Dim user As String
  
 sBuffer = Space$(255)
 LSize = Len(sBuffer)
  
 Call GetUserName(sBuffer, LSize)
  
 If LSize > 0 Then
  user = Left$(sBuffer, LSize - 1)
 Else
  user = vbNullString
 End If
  
 GetNTUserA = user
  
End Function
Private Sub Worksheet_Change(ByVal Target As Range)
   
    If Target.Column = 6 Then
    Target.Offset(0, 11).Value = Date
  End If
      
    If Target.Column = 6 Then
    Target.Offset(0, 10).Value = GetNTUserA
  End If

End Sub

Guten tag, habe gelesen dass 50 mm brennweite als standardobjektiv angesehen wird alles was darunter ist als weitwinkelobjektiv angesehen wird und alles was darüber ist als teleobjektiv angesehen wird. nun ist es ja aber so dass makroobjektive eine brennweite vom 100 mm hat. erste frage haben makroobjektive immer 100 mm oder in welchem brennweitenbereich werden makroobjektive definiert. zweite frage nun ist es ja so dass 100 schon eine eher höhere brennweite und somit ja schon in ein teil des teleobjektivs fällt punkt nun stellt sich bei mir die frage was eigentlich der unterschied zwischen den beiden genau jetzt. Bei beiden wird das Objekt ja näher ran geholt und vergrößert. Ist also der einzigste Unterschied dass man bei einem Makro Objektiv ein sehr geringe Naheinstellgrenze hat und man nah an das Objekt dran muss und man bei einem Tele die Fotos von weitem schießen kann? LG lasse

Ich habe hunderte Spalten. Manche von Ihnen sind gefüllt, manche leer. Gibt es eine Möglichkeit, die gefüllten Zellen, wie unten in Spalte G zu sehen, automatisiert zusammenzufassen? Manuell krieg ich das nicht hin, es ist zu viel.

Guten Morgen Allseits,

ich suche nach einem Schema, Erklärung Schritt für Schritt für Excel VBA Programmierung:

Habe von dem Prof. eine Anleitung dazu bekommen, aber das ist mehr so eine Märchengeschichte.

Nun seid IHR gefragt, habt ihr eine gute Quelle für mich wo das kurz und bündig, aber effizient erklärt wird?

Vielen Dankeschön Euch!

Hallo,

ich gebe in der Zelle A1 eine Chargennummer ein und in der selben Zeile schreibe ich ein paar andere Infos zu dieser Charge.

Nun brauche ich zu dieser Chargennummer aber 50-100 andere Zahlenwerte. Es wäre praktisch, wenn ich einen Doppelklick auf die Charge mache und sich darunter dann diese Werte öffnen (oder irgendwie anders, muss kein Doppelklick sein)

Z.b.

Charge 0000000

• Wert1
• Wert2
• Wert3
• ...

Will einfach diese Werte auf und zuklappen. Ist soetwas möglich?

Hallo zusammen,

ich bräuchte mal eure Hilfe.

Ich will die Zellen N1 und O1 verbinden.

Das kriege ich ja mit Range("N1:O1").Merge hin.

Was ich aber suche ist, Makros soll die nächste freie Zelle in Spalte N und O finden und verbinden. Quasi wenn N1:O1 schon verbunden ist soll er N2:O2 verbinden, also die nächste freie.

Kann mir da jemand helfen?

Danke

Hallo zusammen

Ich habe mir ein Add-In aus dem MS Store heruntergeladen.

Dieses Add-In heisst "Scann-IT to Office" und ist dafür da, um Barcodes zu scannen und ins Excel zu transferieren.

Dieses Add-in will ich nun per Makro aktiveren. Jedoch lässt es sich nicht einfach per Makro aufzeichnen lösen, da die Interaktionen in der Menu Leiste nicht registriert werden. Alle meine bisherigen Versuche per VBA Code sind bis jetzt gescheitert.

Vielen Dank für die Antworten.

Ich will gern das mein Formular nach abschicken oder beim Wiederaufruf geleert ist.

Hallo, ich würde gerne eine Rechnung mit einem Makro erstellen. Soweit klappt das auch und die Mail öffnet sich auch, aber diese wird nicht als Anhang hinzugefügt. Ich komme leider nicht drauf. Ich denke, es liegt daran, dass er die Datei nicht findet, aber ich wüsste keinen Lösungsansatz. Hier der Code:

Dim Result As VbMsgBoxResult

Sub RechnungsnrUndDrucken()

Sheets("Rechnung_Video").Select

[D15] = [D15] + 1 'Rechnungsnummer 1 hochzählen

  Dim sCC As String

  Dim sName As String

  Dim sText As String

  Dim sObject As String

  Dim sCompany As String

  Dim sRefNr As String

  Dim sTempFileName As String

  If (CStr(ThisWorkbook.ActiveSheet.Name) = "Rechnung") Then

    Result = MsgBox("Rechnung fertig?", vbApplicationModal Or vbQuestion Or vbYesNo)

    If Result = vbNo Then Exit Sub

  End If

Const DateiPfad = "C:\Temp\"

  Dim DateiName As String

  DateiName = DateiPfad & Range("C15") & Range("D15") & ".pdf"

  Range("A1:F54").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _

    DateiName, Quality:=xlQualityStandard, _

 IncludeDocProperties:=True, _

  IgnorePrintAreas:=False, _

  OpenAfterPublish:=False

Dim Nachricht As Object, OutApp As Object

Dim AWS As String

Set OutApp = CreateObject("Outlook.Application")

AWS = strFileName

'InitializeOutlook = True

Set Nachricht = OutApp.CreateItem(0)

With Nachricht

.Subject = "" & Range("A1") & "_" & Range("C15") & Range("D15")

.GetInspector.display

'.Attachments.Add ("C:\Temp\" & Range("C15") & Range("D15") & ".pdf")

End With

Set OutApp = Nothing

Set Nachricht = Nothing

End Sub

Hallo zusammen,

was müsste ich hinzufügen, um den Laufzeitfehler 5 zu umgehen? Wenn ich den VBA-Code ausführe, öffnet sich das Fenster für den Import von DAT-Dateien. Drücke ich auf Abbrechen, erscheint der Laufzeitfehler 5. Vermerkt wird der Code "Set F = fs.GetFolder(strPfad)". Wo und welchen Code müsste ich hinzufügen, um den Fehler zu beheben? Vielen Dank im Voraus. :)

Sub Schaltfläche1_Klicken()
'
'
'*** Öffnen von DAT-Dateien
Dim strText As String, strFilter As String

strText = "Bitte eine Auswertung Auswählen"
strFilter = "DAT-Dateien (*.DAT), *.DAT"""
strAuswahl = Application.GetOpenFilename(strFilter, 1, strText)
strPfad = Pfad_ermitteln(strAuswahl)
'
Set fs = CreateObject("Scripting.FileSystemObject")
Set F = fs.GetFolder(strPfad)
Set fc = F.Files

If ActiveSheet Is Nothing Then Workbooks.Add
For Each File In fc
    Zeile = Cells(65000, 1).End(xlUp).Row + 2
    strEinfügen = Cells(Zeile, 1).Address
    strAuswahl = File.Path

    'Einfügen
    With ActiveSheet.QueryTables.Add(Connection:= _
        "TEXT;" & strAuswahl _
        , Destination:=Range(strEinfügen))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .TextFilePromptOnRefresh = False
        .TextFilePlatform = 850
        .TextFileStartRow = 1
        .TextFileParseType = xlDelimited
        .TextFileTextQualifier = xlTextQualifierDoubleQuote
        .TextFileConsecutiveDelimiter = False
        .TextFileTabDelimiter = True
        .TextFileSemicolonDelimiter = False
        .TextFileCommaDelimiter = False
        .TextFileSpaceDelimiter = False
        .TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
        .TextFileDecimalSeparator = "."
        .TextFileThousandsSeparator = ","
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
  End With
  Range(strEinfügen).QueryTable.Delete
Next
End Sub
_______________________________

 Function Pfad_ermitteln(ByVal strAuswahl As String) As String
 
 For i = Len(strAuswahl) To 1 Step -1
    If Mid(strAuswahl, i, 1) = "\" Then
        Pfad_ermitteln = Left(strAuswahl, i - 1)
        Exit Function
    End If
Next
End Function

Servus, in der Aufgabe soll man Temperaturen umrechnen.

mein Makro:

#define CONVERTER(c)(((c) * (9 / 5)) + 32)

meine Ausgabe:

printf("%f  ", CONVERTER(temp[i]));

Wie erreiche ich jetzt, dass das Ergebnis von CONVERTER richtig ausgeben wird?

Da zum Beispiel für 1 Grad, das Ergebnis 33 Fahrenheit ist, da hier ja 9/5 = 1, ich will aber ja die Kommazahl (float) von 9/5.

Gruß

Hallo zusammen

ich benötige Hilfe und zwar habe ich in verschiedenen Zeilen z.B .... [Kundenname] [Datum] stehen und würde jetzt gerne diese automatisch mit Inhalten einer bestimmten Zelle austauschen sobald man dort etwas einfügt. z.B Vertrag [Kundenname] (Zelle G3) wird zu Vertrag Gutefrage (da aus A1 "Gutefrage") 

ist das verständlich? ich habe leider so gar keine Ahnung was Visual Basic angeht 

Danke euch!

Hey zusammen!

Ich würde mir gerne ein Stream Deck von Elgato zulegen, weiß aber nicht welches besser davon ist. Das Stream-Deck XL hat 32, das normale 15 Tasten. Welches würdet Ihr mir WARUM empfehlen?

Es wäre sehr nett wenn Ihr mir dabei helfen könntet.

Danke für Eure Hilfe im Voraus

LG

Hallo, wo finde ich Hilfe zu diesem Thema? Für Excel gibt es genügend deutsche Foren.

Wo finde ich Hilfe zu Google Tabellen und Makros darin?

Hi,

wie schaffe ich es, dass der Filter nicht mit "TEST", sondern mit der Variable gefüllt wird? (Variable ist einfach nur "Z")

Sub Schaltfläche6_Klicken()
'
' Schaltfläche6_Klicken Makro
'

'
Dim Variable As Variant


Variable = Range("B1").Value

   ActiveSheet.ListObjects("Tabelle1").Range.AutoFilter Field:=2, Criteria1:= _
       "TEST"
End Sub

ich benötige dringend Hilfe bei diesem Makro!

ich habe dieses Makro von einem Mitglied von gf.

dieses Makro benötigt dringend eine Schleife

von Zeile 1 To 6000

also Zeile 1 ist SUMME(ZÄHLENWENN($A1:$F1;$L:$Q))

und Zeile 2 wäre dann $A2:$F2

und das Ganze dann bis Zeile 6000

Sub FormelAnpassen()

Dim spalte As Long

Dim zeile As Long

Dim bezugZeile As Long

zeile = 2

bezugZeile = 0

For spalte = 20 To 200

   bezugZeile = bezugZeile + 1

   Cells(zeile, spalte).FormulaArray = "=SUM(COUNTIF($A1:$F1,$L$" & bezugZeile & ":$Q$" & bezugZeile & "))"

Next

End Sub

es wäre super wenn mir jemand helfen würde

danke im voraus

Hallo zusammen,

ich habe eine Excel-Datei, welche ich unter .xlsx speichern wollte. Es wird mir gemeldet, dass sich in dieser Excel Makrso befinden. Leider weiß ich nicht mehr genau, was ich damals da an Makros eingepflegt habe.

Ich kann sie nur unter .xlsm speichern.

Und wenn ich sie unter .xlsx speichere, erscheint die Meldung, dass kein automatisches Speichern möglich ist.

Wo und wie kann ich erkennen, welche Makro da noch irgendwo schlummern? In den Entwicklertools finde ich sie nicht!

Danke für eure Hilfe!

Ich würde gerne in einer Excel-Arbeitsmappe einen Zellbereich so definieren, dass wenn ein bestimmter Nutzer darauf klickt automatisch ein Bild geöffnet wird welches irgendwo gespeichert ist. Bei allen anderen Benutzern sollte aber nichts passieren und der Zellbereich ganz normal bearbeitet werden.

Also so im Stile von: Wenn Benutzer XY auf den Zellbereich A1:A25 klickt öffnet sich automatisch c:/Beispielbild.jpg, sonst passiert nichts.

Leider kenne ich mich mit Makros kaum aus. Habe versucht mich hierzu etwas schlau zu lesen. Meine Codes haben aber alle nicht funktioniert.

Danke schon mal im voraus

In Excel möchte ich immer wieder die gleichen Felder in Pivot berechnen.

Bedeutet sowas wie X/Y.

Derzeit gehe ich den Weg händisch, was relativ zeitintensiv ist.

Name eintragen, Formel hinterlegen und dann die Werte in % formatieren.

Gibt es dafür nicht eine 1-Click Lösung, die ich mir in Excel bauen kann?

Hallo, ich würde gerne diesen Befehl: =A3&" "&B3&","&A4&" "&B4&“, gerne automatisieren auf 600 Zeilen. Mir wurde gesagt ich brauche dafür ein Makro und eine for Schleife programmieren, aber wie geht das? Kann mir wer helfen?

Hallo,

kann man in Excel auf ein Makro einen Pfeil (Form bei Word) platzieren (siehe Bild), dass wenn man draufklickt es nach oben springt?

Danke

ich habe zwei lange makros erstellt und würde die gerne nacheinander schalten

also ohne beide selber zu drücken sondern nur eine

wie kann ich das machen? ich hab die makro über die icue software erstellt

Hey liebe Fotocommunity,
Ich bin seit ca. 3 Monaten in der Makrofotografie aktiv, benutze dafür aber bis jetzt nur ein "allround" Objektiv. Und da mir Makro echt Spaß macht wollte ich jetzt upgraden. Nur weiß ich leider nicht ob ich mir einfach Zwischenringe kaufen sollte oder direkt ein Makroobjektiv. Und vielleicht könntet ihr auch gleich eins dazu schreiben was ihr empfehlen könntet. Kamera ist die EOS450d von Canon.
Danke :)

Servus Leute

Ich weiß es gibt keine Einstellung die für jede Situation perfekt ist

Aber ich wollte mal wissen mit welcher Einstellungen ihr am meisten fotografiert bei welcher Situation

Ich sag schon mal im voraus vielen Dank

Servus

Kann mir einer eine oder mehrere gute Einstellungen sagen für makro Aufnahmen wie zB bei insekten oder Pflanzen?