Hallo zusammen! Ich greife diesen etwas in die Jahre gekommenen Thread mal wieder auf, da ich ein kleines Problem beim Öffnen von Word 2007 habe. Vorab: Ich bin totaler Laie was VB und Makros angeht. Ich habe vor kurzem versucht, die zu konfigurieren (zwecks Standard-Schrift und -Absatzformatierung). Als das endlich gelungen war, wurde die Seitenansicht in Word plötzlich nur noch im Zoom-Faktor 70% anstatt 100% angezeigt. Irgendwie bin ich über's Netz auf eine Anleitung gestoßen, dass sich das Problem mit folgendem Makro-Befehl lösen ließe: Sub AutoOpen() = 100 End Sub Folglich habe ich den Code in VB eingefügt. Seitdem erscheint allerdings bei jedem Öffnen eines Word-Dokuments die Fehlermeldung "Objektvariable oder With-Blockvariable nicht festgelegt". Es wäre klasse, wenn jemand Rat weiß und mir helfen könnte. Vielen Dank vorab und beste Grüße Thema: Objektvariable oder With-Blockvariable nicht festgelegt????? Objektvariable oder With-Blockvariable nicht festgelegt????? - Similar Threads - Objektvariable With Blockvariable Objektvariable Blockvariable Laufzeitfehler 91 in Microsoft Excel Hilfe Objektvariable Blockvariable Laufzeitfehler 91: Moin, bin mit folgendem VB Code etwas ratlos.
5) fusstabelle. LockAnchor = True ' 4 'vor den Text 'Fokus aus der Kopfzeile herausnehmen ctions(1) 'Fokus auf den normalen Bereich zur�cklegen (aus der Kopfzeile heraus) (2) 'ans Ende der Markierung springen (aus den Textfeldern des Normalen Bereichs) wdStory If <> wdPaneNone Then = wdPrintView Else 'End 4. )_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_*_ '5B. )______________________________________________________________________________ 'einschalten des Formularschutzes um 'innerhalb des Briefs Formularfelder zu benutzen Dim afield As Object Dim count As Long For Each afield In rmFields If = wdFieldFormTextInput Then count = count + 1 Next afield If count > 0 _ Then otect Type:=wdAllowOnlyFormFields, NoReset:=True 'End 5B. )_________________________________________________________________________ '6. )_______________________________________________________________________________ 'Festlegen dass oApp zugeordnet ist '(Element des Schutzmakros If oApp Is Nothing Then Set oApp = lication 'End 6.
VBA - Laufzeitfehler 91: Objektvariable... nicht festgelegt Hallo Zusammen, ich erhalte im meinem Code den Laufzeitfehler 91: Objektvariable oder With-Blockvariable nicht festgelegt. Der Code lief bis vor kurzem noch, jetzt will er aber nicht mehr und ich habe absolut keine Ahnung wieso. Könnte jemand bitte so nett sein und mir bei meinem Problem helfen? Über eine Erklärung, warum der Fehler auftritt würde ich mich auch freuen, damit ich in Zukunft das Problem selbst lösen kann. Schon mal vielen Dank für jedgliche Hilfestellungen und Antworten. Code: Private Sub Workbook_Open() Dim VorMon As String Dim Mon As Range heets("Übersicht"). Activate 'Befüllt die Dropdownliste mit Konten aus der Bilanz Bsp. : Rohstoffe, Guss, Normteile.... Worksheets("Übersicht"). = heets("Beschriftungen")("A2:A28") Daten = Worksheets("Übersicht"). 'Prüfung, ob in Monatsspalte in Reiter "Hilfstabelle" aktuelle Monatswerte stehen 'Ermittlung des Vormonats und eintragen in die Variable VorMon VorMon = Format(CDate(DateSerial(Year(Date), Month(Date) - 1, 1)), "mmmm yy") 'Sucht im Reiter "Hilfstabelle" nach dem Vormonat und prüft, ob in der Spalte Werte stehen.
05. 10. 2021, 10:00 # 1 Neuer Benutzer Registrierung: 21. 07. 2021 Karma: VBA - "Objektvariable oder With-Blockvariable nicht festgelegt" Hallo @ all, ich erstelle mithilfe von VBA eine Stückliste in Excel. Da sich Teile des Codes sich wiederholen, habe ich diese in Functions und anderen Subs verbaut. Jetzt habe ich ein Sub um Tabellen zu erzeugen (wenn nicht schon vorhanden). Beim. bekomme ich aber den Fehler: "Objektvariable oder With-Blockvariable nicht festgelegt" Zaehler ist in diesem Fall eine Function die befüllte Zellen für mich zählt, damit die Tabelle die richtige Range hat. Range ist auch schon das richtige Stichwort, da allen Anschein nach, die Range bei der Methode Schwierigkeiten bereitet. Ich habe es in allen mir bekannten Formen versucht. Interessant ist noch das der Fehler beim Debuggen manchmal nicht auftaucht und machmal bekomme ich nur ein Laufzeitfehler oder "400". Ich hoffe jemand kennt den Fehler oder kann mir anderweitig weiterhelfen. Liebe Grüße Odem Code: Sub tabEin(ByVal nameWB As String, ByVal nameWS As String, ByVal xStart As Integer) Dim ws As Worksheet Dim oListObj As ListObject Dim x As Integer Dim tabName Set ws = Workbooks(nameWB)(nameWS) For Each ws In Sheets If = 0 Then x = zaehler(Workbooks(nameWB), nameWS) + xStart tivate Workbooks(nameWB)(nameWS).
Wo ist hier der Fehler? siehe Code Gruß Christa -- Access-FAQ: SQL-Server-FAQ: Newbie-Info: Hallo Michael, Post by Michael Knoth Vielen Dank! Ich hab x Mal den Code gelesen und debuggt und x mal ist mir das nicht aufgefallen. schieb's auf die Hitze;-) Post by Michael Knoth Das kommt davon, wenn man Teile eines Codes aus einem anderen Modul kopiert.... ja, da bleibt schon mal was auf der Strecke und man wundert sich, wieso es dort läuft und hier nicht. Gruß Christa -- Access-FAQ: SQL-Server-FAQ: Newbie-Info: Suchen in den Newsgroups: Hallo, Du hast was vergessen: set db = CurrentDB Ausserdem würde ich an Deiner Stelle prüfen, ob und wieviele Datensätze Dein Recordset zurückliefert und entsprechend verfahren! mfg Helmut Schimmel Post by Michael Knoth Hallo NG! Ich habe einen tbl "LogProtokoll", in dem festgehalten wird, wer, wann, wielange eine bestimmten DB benützt hat. strUser wurde bei Programmstart als Public strUser As String definiert und nicht gelöscht In LogProtokoll gibt es auch einen DS, der der SQL entspricht (qry funzt ja auch! )
2020 17:29:02 Versuch das:. Columns(1) Geschrieben am: 17. 2020 09:05:36 Hallo, erstmal danke für die schnelle Antwort. Ich habe jetzt folgendes eingegeben: dokTitel = (. Columns(1)(dokNummer), 2) Leider immer noch dieselbe Situation. Sub-Ausführung über Click_Button funktioniert prinzipiell (Alle Werte werden in Tabelle geschrieben), aber Fehlermeldung unverändert. "Objektvariable oder With-Blockvariable nicht festgelegt. " Geschrieben am: 21. 2020 09:59:54 kann mir jemand weiterhelfen? Ich habe wohl das Kontrollkästchen nicht markiert, dass der Beitrag noch nciht beantwortet wurde. Sry bin neu hier. von: Hajo_Zi Geschrieben am: 21. 2020 15:16:55 Zu Deiner Datei kann ich nichts schreiben, was wohl daran liegt das ich nicht auf fremde Rechner baue keine Datei nach. Sollte die Datei verlinkt werden? Wenn du an Stelle einer Demomappe deine Originalmappe hochladen willst, diese aber sensible Daten enthält, kannst du diese Daten änderrn. Das ist nur meine Meinung zu dem Thema. Geschrieben am: 22.
Wenn ich ihn zweimal nacheinander ausführen möchte, bekomme ich diese Fehlermeldung: "Objektvariable oder With-Blockvariable nicht festgelegt" in diesem Teil des Codes: FileName:= _ "C:\... \Temp\" & "Auswertung" & "", _ FileFormat:=xlOpenXMLWorkbook, Password:="ABCDEFG", CreateBackup:=False Der Code scheint mir Excel nicht ganz zu schließen, jedenfalls ist im Task Manager immer noch ein Excel-Hintergrund-Prozess offen. Wenn ich den manuell schließe, funktioniert auch der Code wieder. Ich komme nicht drauf, was es ist - habt Ihr eine Idee, was ich falsch mache? Und noch eine Anfänger-Bonusfrage: Ich weise ja mehreren Variablen einen Objektverweis (hab ich das richtig gesagt? ) zu (z. B. Set xlsApp = CreateObject("lication")). Ich habe mal gelesen, dass man das mit "Set... = Nothing" rückgängig machen sollte (da war von "Aufräumen" die Rede). Ist das richtig, und wo müsste ich das einfügen? Ganz am Ende? Oder hängt genau das mit meinem Fehler zusammen? Beste Grüße Alex
Hab da auch nicht soviel Ahnung. Ich sammele Veränderungen aus einer Tabelle und will sie dann per Mail versenden. Würde mir jemand eine Lösung... Objektvariable oder With-Blockvariable nicht festgelegt in Microsoft Excel Hilfe Objektvariable oder With-Blockvariable nicht festgelegt: Hi Leute, Ich versuche mich gerade dabei gewisse Variablen global zur Verfügung zu stellen und diese bei Workbook_Open() mit bestimmten Werten zu versehen. Meine Arbeitsmappe beinhaltet 7... Objektvariable oder With Blockvariable nicht festgelegt in Microsoft Excel Hilfe Objektvariable oder With Blockvariable nicht festgelegt: Hallo, ich habe folgenden Tabellen-Code Code: Private Sub Worksheet_SelectionChange(ByVal Target As Range) '##################################################################### Dim ASpalte As... Laufzeitfehler 91 Objektvariable oder With-Blockvariable nicht festgelegt in Microsoft Excel Hilfe Laufzeitfehler 91 Objektvariable oder With-Blockvariable nicht festgelegt: Kennt jemand diesen Fehler?
Hallo Dieter, in A97 konnten Recordsets einfach nur durch Dim rst as clariert werden. Es kann sein, dass du bei A00 die Declaration als cordset und die dbs als base declarieren musst. bei A02 ist das so..... Vielleicht hast du das auch schon versucht. Gruß Jörg. -----Originalnachricht----- Hallo zusammen, nach der Konvertierung einer DB von A97 auf A00 kommt Laufzeitfehler 91 - Objektvariable oder With- Blockvariable nicht festgelegt. Hat jemand eine Antwort dazu? Danke im Voraus Gruß Dieter. Loading...
Frage Hallo, Ich habe ein Outlook AddIn entwickelt, damit man die Mails als in lokaler Festplatt speichern kann. Wenn ich eine Mail (MSG) öffne und Outlook ist nicht geöffnet, erscheint folgende Fehlermeldung " die Objektvariable oder With-Blockvariable wurde nicht festgelegt ". Wenn ich das AddIn deaktiviere, erscheint diese Fehlermeldung nicht. was könnte das sein? VG, Dan Alle Antworten hallo Robert, es ist auch von mir gepostet. aber das Problem wurde jetzt schon gelöst. Danke! VG, Dan Hallo Dan, Es wäre hilfreich, wenn Du posten würdest wie es funktioniert hat, denn dann profitieren unter Umständen andere mit dem gleichen Problem davon. Danke. Robert