Access VBA-Code "Wert setzen"

Guten Tag gutefrage.net Community

Ich habe ein Problem in Access, wie man sieht^^

Ich vresuche in einer Datenbank einen Wert, der von einem Formular aus einer Tabelle genommen wird in einer anderen Tabelle zu diesem zu ändern.

Jedoch bringe ich das nur mit Makros, die jedoch die ganze DB nach einer Zeut zumüllen.^^

Vielleicht kann mir jemand helfen, das Makro "SetzenWert" gegen einen VBA-Code zu tauschen, so könnte ich mich in VBA auch gleich weiterbilden. VBA ist immerhin Neuland für mich, wie das Internet für Angela Merkel ;)

Vielen Dank schonmal im Vorraus! :)

2 Antworten

micmen

03.07.2013, 13:49

Ich habe das jetzt nur oberflächlich angesehen, aber es gab zumindest in früheren Access-Versionen die Funktion, ein Makro in VB-Code umwandeln zu lassen. Und das hat erstaunlich gut funktioniert, also da kam recht schlanker, sauberer Code heraus. Habe es zwar sehr selten benutzt, weil ich nie wirklich mit Makros gearbeitet habe, aber die paar Male lief das solide.

Und die Funktion war früher zumindest auch sehr leicht zu finden, da brauchte man nicht wirklich zu suchen.

Wenn Du erstmal den Code siehst, der da generiert wurde, hast Du auch den perfekten EInstieg, das noch nach Deinen Wünschen anzupassen.

R34p3r443

Fragesteller

03.07.2013, 14:19

Das mit dem konvertieren habe ich schon probiert, aber leider funktioniert dieser nicht, da meckert er rum, dass es das eine formular nicht gäbe^^

micmen

03.07.2013, 15:26

@R34p3r443

Hat das Formular (oder das relevante Feld) vielleicht eine Bezeichnung, die Leerzeichen, Umlaute oder andere Sonderzeichen enthält, oder eine Bezeichnung, die bereits von Microsoft für etwas verwendet wird? Ist z.B. eine ganz schlechte Idee, ein Tabellenfeld, in das ein Name eingetragen werden soll, "Name" zu nennen... Fast alles in Access hat eine Name-Eigenschaft und früher oder später hat man einen "unerklärlichen" Fehler, weil der Feldname falsch interpretiert wird.

Und wann tritt der Fehler auf: Schon beim Konvertieren (wird gar kein Code generiert?) oder erst, wenn man den generierten Code aufruft?

CholoAleman

03.07.2013, 18:44

@R34p3r443

Hallo,

na den Fehler kannst Du doch einfach beheben indem Du in den Makros nach dem Formular suchst das es nicht gibt. Und Micmens Kommentar beachten, keine reservierten Wörter für Variablen, Felder oder Formulare verwenden!

BeMaDataBoFan

28.11.2015, 17:40

VBA statt MAKRO - so geht's !!!!

Gehe ins Datenbankfenster ...
suche das Makro aus, in dem Dein SetzenWert-Makro definiert ist ...
klicke mit der rechten Maustaste drauf und wähle "Speichern als Modul"
wähle einen bezeichnenden Namen (ohne Leerschritte oder Umlaute) aus
das Makro (mit all seinen Befehlszeilen) wird dann in VBA umgewandelt
jetzt kannst Du das betreffende Formular öffnen,
Dein Steuerelement mit Makro-Aktion auswählen ...
und als Ereignisprozedur die VBA-Funktion aus dem Modul zuordnen

Du kannst die betreffenden Codezeilen aus VBA auch kopieren und in ein extra Access-Modul hineinkopieren und abspeichern ... muss aber nicht sein.

Gruß, Bernd. ;-)

Ich habe eine Access-Datenbank die unter anderem eine Tabelle für den Serienbrief erzeugen und Word mit dem Serienbrief öffnen kann.

In Word habe ich ein Addon, dass den Serienbrief in einzelne PDF-Dateien exportiert.

Diese Serien-PDFs würde ich gerne anschließend aus Access heraus als Anhang versenden - die dazugehörigen Email-Adressen, Namen der Ansprechpartner etc. befinden sich schon in einer Tabelle.

Angeblich gibt es wohl eine Möglichkeit aus Access heraus Emails mit MS-Outlook zu versenden versenden. Mein Problem ist jetzt, dass ich nicht weiß wie man in VBA solche Emails versenden kann.

...zur Frage

MS Access / VBA -- Event Handling im Formular?

Ich hab ein Formular und versuche, wenn auf IRGENDEIN Textfeld geklickt wird, ein Makro bzw. Code zu starten. Ich will aber nicht vorher angeben müssen, welche Textfelder das sind und will auch keine 30 onclicks für jedes Textfeld.

Habt ihr ne Idee? Hab schon gegooglet..

...zur Frage

wie kann ich excel daten ab einer bestimmten Zeile in access importieren?

ich importiere mehrere Excel-Datei Inhalte in eine ACCESS Tabelle, jedoch möchte ich erst ab einer bestimmten Zeile importieren. Wie geht das per VBA natürlich?

...zur Frage

Excel-Makro hält plötzlich an

Hallo,
seit kurzem hakt es beim Ablauf eines Makros, obwohl ich dieses Makro schon lange ohne Probleme benutze.
Nach Anstoß des VBA-Makros erscheint immer mal wieder das Panel mit folgender Meldung:

"Ausführung des Codes wurde unterbrochen"
Fortsetzen Beenden Debuggen Hilfe

Klicke ich auf "Fortsetzen" läuft das Makro weiter, kann dann aber (an einer anderen Stelle) wieder hängenbleiben oder auch komplett durchlaufen.
Klicke ich auf "Debuggen" sehe ich die Stelle(n), an denen das Makro hängenblieb, das sind dann Anweisungen wie diese:

Application.Display Alerts = True
Sheets.Add before: = Sheets("Tabelle99")
Sheets("Tabelle88").Select

also ganz normale VBA-Anweisungen.
Und, es hakt immer an andren Stellen, so dass ich davon ausgehe, dass es nicht an der Code-Zeile selbst liegt.

Klicke ich auf "Hilfe" erscheint nach langer Suche nichts, gebe ich dann in dem angebotenen Suchfenster die Fehlermeldung als Suchstring ein, findet die Hilfe nichts dazu.

Was kann da sein?

LG PG

Der VBA-Code besteht aus 1 Hauptprogramm (Steuerprogramm) und ca. 10 Subroutinen, die Schlüsselworte in einem Excel-sheet suchen und dann Werte vom Spender-Sheet ins Schreibblatt übertragen.

Windows 7
Excel 2007

...zur Frage

Excel-Tabelle in Access-Tabelle übertragen (aber mit unterschiedlichen Spalten)?

Hallo,

Ich habe ein kleines Problem dabei, Datensätze einer Excel-Tabelle in eine Access-Tabelle zu übertragen. Hierzu mal ein kleines Beispiel:

Ich habe in einer Excel Tabelle die Spalten:

Wohnort, Name (Nachname), Alter

In Access gibt es die Spalten:

ID, Personalnummer, Adresse, Nachname

Worauf ich hinaus will: Das Importieren der Excel-Tabelle geht nicht einfach per Import-Funktion: Es sind nämlich:

Spalten in Excel vorhanden, die in Access eine andere Bezeichnung haben
Spalten in Access vorhanden, die es in der Excel-Tabelle gar nicht erst gibt
Spalten in Excel vorhanden, die es bei der Access-Tabelle nicht gibt

Es gibt leider auch (meines Wissens nach) keinen schönen "Import-Assistenten" in Access, mit der man die Zuweisungen ganz leicht erledigen könnte. Ich habe versucht, Makros zu programmieren, aber immer ohne Erfolg :(

(bin leider auch Anfänger auf dem Gebiet)

Ich bitte um eure Hilfe und danke schonmal im Voraus für eure Antworten :)

...zur Frage

Hallo, ich möchte eine Access Tabelle mit einem Makro löschen, falls sie geöffnet ist, soll sie geschlossen werden und danach gelöscht werden?

Sub deleteTable()

If CurrentProject.AllForms("tblUpload").IsLoaded Then DoCmd.Close acForm, "tblUpload" Else DoCmd.DeleteObject acTable, "tblUpload" End If

End Sub

Bekomme aber eine Fehlermeldung: In dem von ihnen eingegebenen ausdruck wird auf ein objekt verwiesen, das geschlossen oder nicht vorhanden ist.

...zur Frage

Excel VBA: Werte aus Eingabefeld in eine Tabelle eintragen?

Hallo, VBA ist nicht meine Welt, daher hoffe ich hier auf eine kleine Unterstützung. Ich brauche ein Makro, welches sich aus drei Eingabefelder ("B1"; "B2" und "B3") den "B3" Wert entnimmt und in einer Tabelle diesen Wert einträgt. Die Tabelle ist wie folgt aufgebaut: Der Wert (Text), welcher in "B1" steht befindet sich irgendwo zwischen "A7" und "A65" und "B2" befindet sich irgendwo zwischen "C6" und "BB6". Vielen Dank im Voraus!

...zur Frage

VBA: Verbindung mit Access-DB aufbauen?

Hallo, ich habe in Excel eine XLSM-Datei und eine accdb-Datei für Access. Jetzt versuche ich in der Excel Datei mittels VBA auf Knopfdruck eine Verbindung zu der Datenbank aufzubauen und probehalber alle Datensätze zu löschen, das funktioniert jedoch nicht, es wird also vermutlich schon die Verbindung nicht klappen... Code ist folgender (aus dem Internet zusammenkopiert, da ich noch nie mit Access-Datenbanken gearbeitet habe):

Public Sub test_db()
Dim conn As ADODB.Connection

    Set conn = New ADODB.Connection
    conn.Open "Provider=Microsoft.ACE.OLEDB.12.0; Data Source = W:\CU-AL\..."
    Sql = "DELETE * FROM Test"
    conn.Close
    End Sub

Was mache ich falsch? Vorallem: welchen Provider brauche ich???

Und ich muss doch auch in Excel unter "Extras" --> "Verweise" bestimmte Häckchen setzen. Wisst ihr, welche das sind?

...zur Frage

Wie öffne ich in Access 2013 per Button den Dateiexplorer und fülle den Pfad in ein Textfeld?

Das habe ich mit einem VBA Code geschafft, nun ist das Problem, dass ich den Pfad welchen ich im Explorer ausgesucht habe nicht in das Textfeld bekomme... Vielen Dank für eure Hilfe!

...zur Frage

Wie kann ich Daten von einer Internetseite automatisch in Excel importieren?

Hallo zusammen,

ich bin gerade dabei, eine Datenbank zu erstellen und würde dafür gerne Daten von einer Website automatisch auslesen lassen. Konkret geht es um die Arbeitslosenquoten aller Landkreise und Städte, die von der Bundesagentur für Arbeit monatlich veröffentlicht werden.

Hier ein Link zu einer Beispielstadt: https://statistik.arbeitsagentur.de/Navigation/Statistik/Statistik-nach-Regionen/Politische-Gebietsstruktur/Bayern/Amberg-Stadt-Nav.html

Im Beispiel sollte die Arbeitslosenquote insgesamt (5,9) und der Stand der Angabe (Mai 2016), der über der Tabelle steht, ausgelesen werden.

Im HTML-Code ist die Quote in folgender Zeile angegeben: 5,9 Beim Datum sieht es folgendermaßen aus: Arbeitsmarkt im Überblick - Berichtsmonat Mai 2016 - Amberg, Stadt

Dabei sollten die ausgelesenen Werte in zwei separaten Excel-Feldern ausgegeben werden. Das muss aber nicht zwingend alles in einem Makro geschehen. Zwei Makros für die unterschiedlichen Felder wären optimal, da ich den Code dann wahrscheinlich auch besser nachvollziehen kann.

Da die direkte Webabfrage über Excel nicht funktioniert, weil die Seite nicht korrekt geladen wird, denke ich, dass VBA hier unumgänglich ist, oder? Ich habe jedoch leider keine Programmierkenntnisse und bin aus den Einträgen in diversen Foren leider auch nicht schlau geworden.

Im Nachhinein müsste das Makro entsprechend anpassbar sein, sodass ich auch die Daten der anderen Städte auslesen kann (die Quellseite ist immer nach dem gleichem Prinzip aufgebaut).

Falls jemand eine Idee hat, wie das Problem zu lösen ist, würde ich mich sehr darüber freuen! Vielen Dank!

...zur Frage

VBA - Daten in andere Datei schreiben

Ich habe ein Excel-sheet mit Daten und Makros. Nun möchte ich die Daten in eine neue Excel Tabelle schreiben, so das keine Makro-Sicherheits meldung beim öffnen der ausgegeben Datei kommt.

Wie geht das?

...zur Frage

Access wie kann man mit Werten aus dem vorigen Datensatz arbeiten

Ich arbeite gerade an einem Berichtsformular (wöchentlich) welches eigentlich schon ganz gut funktioniert.

Was mir noch fehlt ist die Möglichkeit bei der Erstellung eines neuen Datensatzes auf das Datum des vorherigen Datensatzes zu zu greifen um daraus automatisch das Datum des aktuellen Datensatzes berechnen zu können.

Also gibt es in VBA eine Möglichkeit zu prüfen, ob ein vorhergehender Datensatz existiert und wenn ja, aus den Wert aus dem Datumsfeld zu holen?

...zur Frage

Gibt es eine globale Suchfunktion bei Access 2010?

Guten Tag zusammen,

eigentlich ein ganz banales Ansinnen:

Ich habe eine Access 2010 Datenbank mit Unterformularen. Nun möchte ich einen Knopf auf dem Hauptformular, der eine Suche in allen Formularen (Tabellen) durchführt und mir anzeigt, wo sich mein eingegebener Begriff befindet.

Das in der Benutzeroberfläche befindliche Steuerelement 'Suchen' sucht nämlich nur in dem dazugehörigen Formular (Tabelle) aber eben nicht in allen - das reicht mir nicht.

Gibt es einen einfachen Weg aus der Benutzeroberfläche heraus, oder muss ich über VBA mein (bisher gescheitertes) Glück versuchen?

Herzlichen Dank im Voraus

...zur Frage

Variable Verliert ihren wert VBA

Hallo das Problem steht oben und zwar am Anfang wird man nach USER ID und Kennwort gefragt die sollten laut theorie in den Beiden Lokalen variablen gespeichert werden sollang die Access andwendung offen ist. Aber wenn die Funktion die die Werte in dei Variablen schreibt Beendet ist werden die beiden wieder Geleert.

Danke im Varraus

ToHan0510

...zur Frage

Was möchtest Du wissen?

Deine Frage stellen