https://www.clever-excel-forum.de/ Sun, 03 May 2026 12:23:47 +0000 MyBB https://www.clever-excel-forum.de/Thread-keine-Aktiven-Inhalte-Sicherheitsrisiko-Trust-Center Wed, 24 Sep 2025 07:08:12 +0000 wolgr]]> https://www.clever-excel-forum.de/Thread-keine-Aktiven-Inhalte-Sicherheitsrisiko-Trust-Center an meiner Fritzbox habe ich ein NAS-LW und kann dort mit PC und NB zugreifen.
Die Access- und Excel-Dateien haben eine Reihe aktiver Inhalte. Diese konnte ich bisher über den Trust-Center
(alle Makros aktivieren ...) dauerhaft aktivieren.

Gestern habe ich den Internetzugang von DSL auf Glasfaser umgestellt. Bei dieser Prozedur musste ich das
NAS-LW wieder neu anmelden. Beim Aufrufen der Dateien kam der Hinweis, dass die aktiven Elemente aus Sicherheitsgründen deaktiviert sind. Das kenne ich von jeder von Neuanmeldung des Netzlaufwerks.
Aber dieses Mal lassen sich die Aktivelemente nicht wieder aktivieren. 
Die Einstellungen > "Alle Makros aktivieren (nicht empfohlen ...)" und "Alle Steuerelemente ohne Einschränkung ..." werden ignoriert. Wie kann da sein?

  AktivElement_03.jpg (Größe: 39,2 KB / Downloads: 8)

  AktivElement_02.jpg (Größe: 85,44 KB / Downloads: 8)
  AktivElement.jpg (Größe: 112,34 KB / Downloads: 8)
Vom NB kann ich die betreffenden Dateien mit aktiven Inhalten zugreifen.

Mir ist es auch nicht möglich, das Netzlaufwerk als einen "Vertrauenswürdigen Speicherort" zu münzen.
Könnt ihr mir helfen?
Grüße Wolfgang]]> an meiner Fritzbox habe ich ein NAS-LW und kann dort mit PC und NB zugreifen.
Die Access- und Excel-Dateien haben eine Reihe aktiver Inhalte. Diese konnte ich bisher über den Trust-Center
(alle Makros aktivieren ...) dauerhaft aktivieren.

Gestern habe ich den Internetzugang von DSL auf Glasfaser umgestellt. Bei dieser Prozedur musste ich das
NAS-LW wieder neu anmelden. Beim Aufrufen der Dateien kam der Hinweis, dass die aktiven Elemente aus Sicherheitsgründen deaktiviert sind. Das kenne ich von jeder von Neuanmeldung des Netzlaufwerks.
Aber dieses Mal lassen sich die Aktivelemente nicht wieder aktivieren. 
Die Einstellungen > "Alle Makros aktivieren (nicht empfohlen ...)" und "Alle Steuerelemente ohne Einschränkung ..." werden ignoriert. Wie kann da sein?

  AktivElement_03.jpg (Größe: 39,2 KB / Downloads: 8)

  AktivElement_02.jpg (Größe: 85,44 KB / Downloads: 8)
  AktivElement.jpg (Größe: 112,34 KB / Downloads: 8)
Vom NB kann ich die betreffenden Dateien mit aktiven Inhalten zugreifen.

Mir ist es auch nicht möglich, das Netzlaufwerk als einen "Vertrauenswürdigen Speicherort" zu münzen.
Könnt ihr mir helfen?
Grüße Wolfgang]]> https://www.clever-excel-forum.de/Thread-Join-nicht-alle-Felder-werden-exportiert Mon, 02 Jun 2025 11:27:38 +0000 Grosskranfan]]> https://www.clever-excel-forum.de/Thread-Join-nicht-alle-Felder-werden-exportiert ich habe eben eine Abfrage erstellt (Left Join) dessen Ergebnis ich nun exportieren möchte.
Problem: Access exportiert vin den 4 Feldern der Abfrage nur drei und weigert sich beharrlich, daran irgendwas zu ändern. Woran genau könnte das liegen?

Bei den Tabellen handelt es sich um:

Tebelle A:

von uns gelistete Artikel eines Lieferanten

Tabelle B:

preisliste dieses Lieferanten.

Join-Feld

Artikelnummer-Lieferant (aus A) --> Model (Tabelle B)

Der Join funktioniert, das Ergebnis ist das gewünschte.
Anzuzeigende Felder sind

Aus A:
ID (von Access zugefügt)
Artikelname

Aus B:
Model
Price

Wie gesagt werde alle Felder wie gewünscht angezeigt. Aber:
wenn ich das nach Excel oder in ein csv exportiere, wird das Feld "Model" NICHT exportiert.

Häh?!

Ach ja:
die Tabellen wurden aus Excel importiert.]]> ich habe eben eine Abfrage erstellt (Left Join) dessen Ergebnis ich nun exportieren möchte.
Problem: Access exportiert vin den 4 Feldern der Abfrage nur drei und weigert sich beharrlich, daran irgendwas zu ändern. Woran genau könnte das liegen?

Bei den Tabellen handelt es sich um:

Tebelle A:

von uns gelistete Artikel eines Lieferanten

Tabelle B:

preisliste dieses Lieferanten.

Join-Feld

Artikelnummer-Lieferant (aus A) --> Model (Tabelle B)

Der Join funktioniert, das Ergebnis ist das gewünschte.
Anzuzeigende Felder sind

Aus A:
ID (von Access zugefügt)
Artikelname

Aus B:
Model
Price

Wie gesagt werde alle Felder wie gewünscht angezeigt. Aber:
wenn ich das nach Excel oder in ein csv exportiere, wird das Feld "Model" NICHT exportiert.

Häh?!

Ach ja:
die Tabellen wurden aus Excel importiert.]]> https://www.clever-excel-forum.de/Thread-Kompatibilitaetsprobleme-zwischen-Access-Office-2016-und-Access-Office-2021 Fri, 06 Dec 2024 16:35:41 +0000 Royalty]]> https://www.clever-excel-forum.de/Thread-Kompatibilitaetsprobleme-zwischen-Access-Office-2016-und-Access-Office-2021
Im Oktober wurde dann unser Office auf die 2021 Version upgedatet. Ende Oktober fing dann das Problem mit der Datenbank an, die inkompatibiltäten zeigt. Da sind auf einmal unvollständige Datensätze bzw. Fehlerhafte Daten zu sehen (4 Stück), deren Inhalt nur per #-Zeichen angezeigt werden. Weiter wird eine weitere Tabelle angezeigt, die einige Fehlermeldung beinhaltet und es wird automatisch eine Sicherung der Datenbank angelegt.

Der Fehler tritt komischerweise nur in einem Formular auf, dass verschiedene Datensätze aus verschiedenen Tabellen enthält. Dabei werden dann in dem Formular dass Datum der Erledigung eingetragen/aktualisiert.

Leider kann ich zur Zeit den Fehler schwer nachvollziehen. Ich hab die fehlerhaften Datensätze gelöscht, die Datenbank über die Datenbanktools repariert und dann funktioniert sie wie gewohnt. Allerdings erscheint der Fehler dann einige Tage später wieder, wobei einige Tage problemlos damit gearbeitet werden kann.

Hat jemand schon mal ein ähnliches Problem oder sind inkompatibilitäten Zwischen Office 2016 und Office 2021 bekannt?

Gruß
Royalty]]>
Im Oktober wurde dann unser Office auf die 2021 Version upgedatet. Ende Oktober fing dann das Problem mit der Datenbank an, die inkompatibiltäten zeigt. Da sind auf einmal unvollständige Datensätze bzw. Fehlerhafte Daten zu sehen (4 Stück), deren Inhalt nur per #-Zeichen angezeigt werden. Weiter wird eine weitere Tabelle angezeigt, die einige Fehlermeldung beinhaltet und es wird automatisch eine Sicherung der Datenbank angelegt.

Der Fehler tritt komischerweise nur in einem Formular auf, dass verschiedene Datensätze aus verschiedenen Tabellen enthält. Dabei werden dann in dem Formular dass Datum der Erledigung eingetragen/aktualisiert.

Leider kann ich zur Zeit den Fehler schwer nachvollziehen. Ich hab die fehlerhaften Datensätze gelöscht, die Datenbank über die Datenbanktools repariert und dann funktioniert sie wie gewohnt. Allerdings erscheint der Fehler dann einige Tage später wieder, wobei einige Tage problemlos damit gearbeitet werden kann.

Hat jemand schon mal ein ähnliches Problem oder sind inkompatibilitäten Zwischen Office 2016 und Office 2021 bekannt?

Gruß
Royalty]]> https://www.clever-excel-forum.de/Thread-Anzahl-Artikel-mit-in-der-Meldung-im-Textfeld-anzeigen Thu, 29 Aug 2024 10:34:08 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Anzahl-Artikel-mit-in-der-Meldung-im-Textfeld-anzeigen
ich habe eine Übung in der ich eine Meldung anzeigen muss.
Die Meldung: Von der Kategorie: (Kategoriename) sind (Anzahl Artikel der jeweiligen Kategorienamen) Artikel vorhanden.
Im Anhang ist die Datei.
Es soll das Grüne Feld sein mit Roter Schrift wie im Anhang.
Kann mir da einer weiterhelfen.

Gruß Jürgen

  Übung.accdb (Größe: 616 KB / Downloads: 0) ]]>
ich habe eine Übung in der ich eine Meldung anzeigen muss.
Die Meldung: Von der Kategorie: (Kategoriename) sind (Anzahl Artikel der jeweiligen Kategorienamen) Artikel vorhanden.
Im Anhang ist die Datei.
Es soll das Grüne Feld sein mit Roter Schrift wie im Anhang.
Kann mir da einer weiterhelfen.

Gruß Jürgen

  Übung.accdb (Größe: 616 KB / Downloads: 0) ]]> https://www.clever-excel-forum.de/Thread-Meldung-MsgBox-in-Tab-Schreiben Fri, 09 Aug 2024 11:06:27 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Meldung-MsgBox-in-Tab-Schreiben
ich habe da ein Problem und hoffe das Ihr mir das weiterhelfen könnt.
Der Code Funktioniert soweit, ich möchte das anschließend die in der Meldung angezeigten Informationen in das Feld Bemerkung (Tabelle Mieter) eingetragen wir , sollte bereits ein Inhalt vorhanden sein soll dieser überschrieben werden.

Der Code:
Option Compare Database
Option Explicit
Sub mod_Aufgabe2b()
Dim rs As New ADODB.Recordset
Dim strSql As String
Dim strMeldung As String
Dim strVorname As String
Dim strName As String
Dim strOrt As String
Dim strTitel As String

strSql = "SELECT Top 1 Mieter.Vorname, Mieter.Name, Mieter.Ort, Sum([Mietpreis]) AS Ges_Mietpreis, Count([Mietpreis]) AS Anzahl_Mieteinnahmen " & _
        " FROM Mieter INNER JOIN Belegung ON Mieter.MieterNr = Belegung.MieterNr" & _
        " GROUP BY Mieter.Vorname, Mieter.Name, Mieter.Ort" & _
        " Order By Sum([Mietpreis]) DESC"

    rs.Open strSql, CurrentProject.Connection, adOpenForwardOnly, adLockOptimistic
   
    With rs
        If Not .EOF Then
                strMeldung = "Bester Mieter!" & vbCr & "Mieteinnahmen: " & _
                Format(.Fields("Ges_Mietpreis"), "0.00 €") & vbCr & "Anzahl der Buchungen: " & .Fields("Anzahl_Mieteinnahmen")
                strTitel = "Unser Champion:" & .Fields("Vorname") & " " & .Fields("Name") & " aus: " & .Fields("Ort") & "."
                rs.MoveNext
        End If
    End With
rs.Close
Set rs = Nothing
MsgBox strMeldung, vbInformation, strTitel
End Sub

Danke und Gruß
Jürgen]]>
ich habe da ein Problem und hoffe das Ihr mir das weiterhelfen könnt.
Der Code Funktioniert soweit, ich möchte das anschließend die in der Meldung angezeigten Informationen in das Feld Bemerkung (Tabelle Mieter) eingetragen wir , sollte bereits ein Inhalt vorhanden sein soll dieser überschrieben werden.

Der Code:
Option Compare Database
Option Explicit
Sub mod_Aufgabe2b()
Dim rs As New ADODB.Recordset
Dim strSql As String
Dim strMeldung As String
Dim strVorname As String
Dim strName As String
Dim strOrt As String
Dim strTitel As String

strSql = "SELECT Top 1 Mieter.Vorname, Mieter.Name, Mieter.Ort, Sum([Mietpreis]) AS Ges_Mietpreis, Count([Mietpreis]) AS Anzahl_Mieteinnahmen " & _
        " FROM Mieter INNER JOIN Belegung ON Mieter.MieterNr = Belegung.MieterNr" & _
        " GROUP BY Mieter.Vorname, Mieter.Name, Mieter.Ort" & _
        " Order By Sum([Mietpreis]) DESC"

    rs.Open strSql, CurrentProject.Connection, adOpenForwardOnly, adLockOptimistic
   
    With rs
        If Not .EOF Then
                strMeldung = "Bester Mieter!" & vbCr & "Mieteinnahmen: " & _
                Format(.Fields("Ges_Mietpreis"), "0.00 €") & vbCr & "Anzahl der Buchungen: " & .Fields("Anzahl_Mieteinnahmen")
                strTitel = "Unser Champion:" & .Fields("Vorname") & " " & .Fields("Name") & " aus: " & .Fields("Ort") & "."
                rs.MoveNext
        End If
    End With
rs.Close
Set rs = Nothing
MsgBox strMeldung, vbInformation, strTitel
End Sub

Danke und Gruß
Jürgen]]> https://www.clever-excel-forum.de/Thread-Werte-in-MsgBox-aus-selektierung-SQL-Code Fri, 09 Aug 2024 09:38:44 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Werte-in-MsgBox-aus-selektierung-SQL-Code hier im CODE habe ich unten in der MsgBox strMeldung den Vornamen , Namen und Ort drin stehen bekomme aber die Meldung , Variabel fehler.

Er soll mir den Namen aus den SQL geben, Funktioniert leider nicht.
Hat jemand ein Tipp für mich.

Option Compare Database
Option Explicit
Sub mod_Aufgabe2b()
Dim rs As New ADODB.Recordset
Dim strSql As String
Dim strMeldung As String
Dim strVorname As String
Dim strName As String
Dim strOrt As String

strSql = "SELECT Mieter.Vorname, Mieter.Name, Mieter.Ort, Sum([Mietpreis]) AS Ges_Mietpreis, Count([Mietpreis]) AS Anzahl_Mieteinnahmen" & _
        " FROM Mieter INNER JOIN Belegung ON Mieter.MieterNr = Belegung.MieterNr" & _
        " GROUP BY Mieter.Vorname, Mieter.Name, Ges_Mietpreis,  Anzahl_Mieteinnahmen;"

    rs.Open strSql, CurrentProject.Connection, adOpenForwardOnly, adLockOptimistic
   
    With rs
        If Not .EOF Then
            While .EOF = False
                strMeldung = strMeldung & "Bester Mieter!" & vbCr & "Mieteinnahmen: " & _
                Format(.Fields("Ges_Mietreis"), "0.00 €") & vbCr & "Anzahl der Buchungen: " & .Fields("Anzahl_Mieteinnahmen")
               
                rs.MoveNext
            Wend
        End If
    End With
rs.Close
Set rs = Nothing
MsgBox strMeldung, vbInformation, "Unser Champion:" & Mieter.Vorname & " " & Mieter.Name & " aus: " & Mieter.Ort & "."
End Sub]]> hier im CODE habe ich unten in der MsgBox strMeldung den Vornamen , Namen und Ort drin stehen bekomme aber die Meldung , Variabel fehler.

Er soll mir den Namen aus den SQL geben, Funktioniert leider nicht.
Hat jemand ein Tipp für mich.

Option Compare Database
Option Explicit
Sub mod_Aufgabe2b()
Dim rs As New ADODB.Recordset
Dim strSql As String
Dim strMeldung As String
Dim strVorname As String
Dim strName As String
Dim strOrt As String

strSql = "SELECT Mieter.Vorname, Mieter.Name, Mieter.Ort, Sum([Mietpreis]) AS Ges_Mietpreis, Count([Mietpreis]) AS Anzahl_Mieteinnahmen" & _
        " FROM Mieter INNER JOIN Belegung ON Mieter.MieterNr = Belegung.MieterNr" & _
        " GROUP BY Mieter.Vorname, Mieter.Name, Ges_Mietpreis,  Anzahl_Mieteinnahmen;"

    rs.Open strSql, CurrentProject.Connection, adOpenForwardOnly, adLockOptimistic
   
    With rs
        If Not .EOF Then
            While .EOF = False
                strMeldung = strMeldung & "Bester Mieter!" & vbCr & "Mieteinnahmen: " & _
                Format(.Fields("Ges_Mietreis"), "0.00 €") & vbCr & "Anzahl der Buchungen: " & .Fields("Anzahl_Mieteinnahmen")
               
                rs.MoveNext
            Wend
        End If
    End With
rs.Close
Set rs = Nothing
MsgBox strMeldung, vbInformation, "Unser Champion:" & Mieter.Vorname & " " & Mieter.Name & " aus: " & Mieter.Ort & "."
End Sub]]> https://www.clever-excel-forum.de/Thread-Fehlender-Operator Wed, 07 Aug 2024 12:25:52 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Fehlender-Operator
ich habe hier eine Aufgabe aus mein Übungsheft,

Ich habe eine Prozedur in Module: mod:Aufgabe2a erstellt.
Aufgabe ist, 
- Erstellen einer Prozedur, die nach Eingabe in einer Inputbox (Eingabe eines Ferienhauses), die Summe Mietpreise aller Belegungen der Eingabe.
- Bei der Eingabe des Ferienhausnamens sollen die Anfangsbuchstaben genügen.
- wenn nicht vorhanden den Fehlermeldung
z.B

Eingabe B*
Ausgabe = siehe Anhang "Bild-Ausgabe"

Bekomme aber immer eine Fehlermeldung, dabei sollte es funktionieren ?

Gruß Jürgen

  Ferienhaus.accdb (Größe: 1,14 MB / Downloads: 4)

  Bild_Ausgabe.docx (Größe: 88,26 KB / Downloads: 3) ]]>
ich habe hier eine Aufgabe aus mein Übungsheft,

Ich habe eine Prozedur in Module: mod:Aufgabe2a erstellt.
Aufgabe ist, 
- Erstellen einer Prozedur, die nach Eingabe in einer Inputbox (Eingabe eines Ferienhauses), die Summe Mietpreise aller Belegungen der Eingabe.
- Bei der Eingabe des Ferienhausnamens sollen die Anfangsbuchstaben genügen.
- wenn nicht vorhanden den Fehlermeldung
z.B

Eingabe B*
Ausgabe = siehe Anhang "Bild-Ausgabe"

Bekomme aber immer eine Fehlermeldung, dabei sollte es funktionieren ?

Gruß Jürgen

  Ferienhaus.accdb (Größe: 1,14 MB / Downloads: 4)

  Bild_Ausgabe.docx (Größe: 88,26 KB / Downloads: 3) ]]> https://www.clever-excel-forum.de/Thread-UPDATE-Anweisung Thu, 25 Jul 2024 05:49:33 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-UPDATE-Anweisung

Ich habe diesen Code:
UPDATE Umfrage 
SET Gruppen = 'Kinder'
WHERE Alter <=8;

hier schreibt er mir auch in der Spalte Gruppen das Word Kinder rein wenn Sie 8 Jahre sind oder jünger.
Das pass soweit.

Ich habe aber noch 5 weitere Kriterien Kriterien die ich da mit reinbekommen muss.
  9–13 Jugendliche
14–19 Junge Erwachsene
20–39 Erwachsene
40–59 Ältere Erwachsene
>= 60 Senioren]]>

Ich habe diesen Code:
UPDATE Umfrage 
SET Gruppen = 'Kinder'
WHERE Alter <=8;

hier schreibt er mir auch in der Spalte Gruppen das Word Kinder rein wenn Sie 8 Jahre sind oder jünger.
Das pass soweit.

Ich habe aber noch 5 weitere Kriterien Kriterien die ich da mit reinbekommen muss.
  9–13 Jugendliche
14–19 Junge Erwachsene
20–39 Erwachsene
40–59 Ältere Erwachsene
>= 60 Senioren]]> https://www.clever-excel-forum.de/Thread-Persoenlicher-Primaerschluessel-erstellen Mon, 15 Jul 2024 10:32:15 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Persoenlicher-Primaerschluessel-erstellen
ich benötige ein Primärschlüssel der folgende Eigenschaften hat.

Textfeld Vorname ersten 2 Buchstaben
Textfeld Nachname ersten 2 Buchstaben 
Textfeld Geburtsdatum 

Ergebniss nach Eintrag in Textfeld Geburtstag

Max
Muster
1.1.2001

=MAMU112001 = Primärschlüssel

Ich weiß nur nicht wie ich es anstellen soll.

Danke und Gruß Jürgen]]>
ich benötige ein Primärschlüssel der folgende Eigenschaften hat.

Textfeld Vorname ersten 2 Buchstaben
Textfeld Nachname ersten 2 Buchstaben 
Textfeld Geburtsdatum 

Ergebniss nach Eintrag in Textfeld Geburtstag

Max
Muster
1.1.2001

=MAMU112001 = Primärschlüssel

Ich weiß nur nicht wie ich es anstellen soll.

Danke und Gruß Jürgen]]> https://www.clever-excel-forum.de/Thread-wenn-nicht-die-Zahlen-1-2-oder-3-denn-MsgBox Thu, 04 Jul 2024 07:42:53 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-wenn-nicht-die-Zahlen-1-2-oder-3-denn-MsgBox
mit diesem Code:

Private Sub A_Not_AfterUpdate()
    If [A_Not] = Not 1 Or Not 3 Or Not 5 Then
        MsgBox "Geben Sie bitte für Ja = 1,  Knapp = 3  und  Nein = 5 ein!", vbCritical, "Falsche Eingabe"
    End If
End Sub

möchte ich, das wenn die Zahlen 1,2 oder 3, nicht eingegeben worden sind denn eine MsgBox.
Die Meldung kommt aber bei der Eingabe was sie bei 1, 2 und 3 nicht machen soll.

Danke und Gruss Jürgen]]>
mit diesem Code:

Private Sub A_Not_AfterUpdate()
    If [A_Not] = Not 1 Or Not 3 Or Not 5 Then
        MsgBox "Geben Sie bitte für Ja = 1,  Knapp = 3  und  Nein = 5 ein!", vbCritical, "Falsche Eingabe"
    End If
End Sub

möchte ich, das wenn die Zahlen 1,2 oder 3, nicht eingegeben worden sind denn eine MsgBox.
Die Meldung kommt aber bei der Eingabe was sie bei 1, 2 und 3 nicht machen soll.

Danke und Gruss Jürgen]]> https://www.clever-excel-forum.de/Thread-wenn-Zahl-nicht-zwischen-1-5-dann-MsgBox Thu, 04 Jul 2024 06:29:58 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-wenn-Zahl-nicht-zwischen-1-5-dann-MsgBox
ich habe hier ein Code der eine Msg Box ausgiebt wenn die Zahl nicht zwischen 1 und 5 liegt.

Private Sub Not_1_AfterUpdate()
    If [Not_1] = 0 Or Not_1 < 5 Then
    MsgBox "Geben Sie bitte eine Zahl zwischen 1 und 5 ein !", vbCritical, "Falsche Eingabe"
    End If
End Sub

wenn ich die 0 eingebe Funktioniert es aber 6 und höher leider nicht. Es sollte eigentlich funktionieren.

Danke Jürgen.]]>
ich habe hier ein Code der eine Msg Box ausgiebt wenn die Zahl nicht zwischen 1 und 5 liegt.

Private Sub Not_1_AfterUpdate()
    If [Not_1] = 0 Or Not_1 < 5 Then
    MsgBox "Geben Sie bitte eine Zahl zwischen 1 und 5 ein !", vbCritical, "Falsche Eingabe"
    End If
End Sub

wenn ich die 0 eingebe Funktioniert es aber 6 und höher leider nicht. Es sollte eigentlich funktionieren.

Danke Jürgen.]]> https://www.clever-excel-forum.de/Thread-Laufzeitfehler-91--40620 Wed, 12 Jun 2024 11:18:39 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Laufzeitfehler-91--40620
Ich habe unter Formulare, ein frmBestellungen, in den eine Schaltfläche "Korrektur BestNrPopUp" ist. Wenn ich dieses Betätige macht es mir ein Fenster auf zur Eingabe der Bestellnummer. Bis hierhin funktioniert alles.
Wenn ich aber eine Bestellnummer eingebe die es schon bereits gibt (2000), soll eine MsgBox sich öffnen mit der Aussage: das es die BesNr bereits vorhanden ist, zur Information das es die Bestellnummer bereits gibt und wenn es die Bestellnummer noch nicht vorhanden ist soll eine MsgBox sich öffnen wo drin steht Okay! die ich mit den Button OK wieder schließe.

Im Anhang habe ich die Datei. Ich komme auf den fehler nicht.
Ich bin gerade dabei das alles zu lernen, und dieses ist eine Aufgabe aus mein Heft.

Danke und Gruß Jürgen

  Aufgabe zur Übung.accdb (Größe: 932 KB / Downloads: 0) ]]>
Ich habe unter Formulare, ein frmBestellungen, in den eine Schaltfläche "Korrektur BestNrPopUp" ist. Wenn ich dieses Betätige macht es mir ein Fenster auf zur Eingabe der Bestellnummer. Bis hierhin funktioniert alles.
Wenn ich aber eine Bestellnummer eingebe die es schon bereits gibt (2000), soll eine MsgBox sich öffnen mit der Aussage: das es die BesNr bereits vorhanden ist, zur Information das es die Bestellnummer bereits gibt und wenn es die Bestellnummer noch nicht vorhanden ist soll eine MsgBox sich öffnen wo drin steht Okay! die ich mit den Button OK wieder schließe.

Im Anhang habe ich die Datei. Ich komme auf den fehler nicht.
Ich bin gerade dabei das alles zu lernen, und dieses ist eine Aufgabe aus mein Heft.

Danke und Gruß Jürgen

  Aufgabe zur Übung.accdb (Größe: 932 KB / Downloads: 0) ]]> https://www.clever-excel-forum.de/Thread-Uhrzeiten-in-Zeit-umwandeln Wed, 05 Jun 2024 08:27:55 +0000 twiinz]]> https://www.clever-excel-forum.de/Thread-Uhrzeiten-in-Zeit-umwandeln
ich benötige für eine Auswertung einen Zahlenwert das ich mit diesem über Access "Runden" kann. 
Leider ist die Uhrzeit auch noch als Uhrzeit formatiert.
Nun meine Frage kann ich mithilfe einer Formel die Uhrzeit auf eine Dezimalzahl umwandeln?

Viele Grüße
twiinz]]>
ich benötige für eine Auswertung einen Zahlenwert das ich mit diesem über Access "Runden" kann. 
Leider ist die Uhrzeit auch noch als Uhrzeit formatiert.
Nun meine Frage kann ich mithilfe einer Formel die Uhrzeit auf eine Dezimalzahl umwandeln?

Viele Grüße
twiinz]]> https://www.clever-excel-forum.de/Thread-Laufzeitfehler-91--40531 Wed, 29 May 2024 10:10:10 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-Laufzeitfehler-91--40531
Ich habe InputBox zur suche aus dem Bemerkungsfeld.

In frmMieter habe ich den Button Suchen mit Jocker, sprich suche in Bemerkung in Sternchen Kinder (*Kinder*) und gib mir die Anzahl der Treffer sowie Daten xy.

Ich bin gerade mit Programmieren angefangen und in der Übungsaufgabe komm ich nicht weiter, warum das ist. Was ich im Netzt lese hilft mir nicht so weiter.

Danke und Gruß Jürgen

  Uebung.accdb (Größe: 600 KB / Downloads: 1) ]]>
Ich habe InputBox zur suche aus dem Bemerkungsfeld.

In frmMieter habe ich den Button Suchen mit Jocker, sprich suche in Bemerkung in Sternchen Kinder (*Kinder*) und gib mir die Anzahl der Treffer sowie Daten xy.

Ich bin gerade mit Programmieren angefangen und in der Übungsaufgabe komm ich nicht weiter, warum das ist. Was ich im Netzt lese hilft mir nicht so weiter.

Danke und Gruß Jürgen

  Uebung.accdb (Größe: 600 KB / Downloads: 1) ]]> https://www.clever-excel-forum.de/Thread-vbAbortRetryIgnore Tue, 28 May 2024 08:41:15 +0000 JuergenRa]]> https://www.clever-excel-forum.de/Thread-vbAbortRetryIgnore
ich möchte unter FrmArtikeldaten (Artikeldaten), nach der Eingabe für eine bereits vorhanden Primarschlüssel (ArtNr) eine Meldung ausgeben mit Abbrechen (Schließen), Wiederholen (Neuereintrag und Courser ins Feld ArtNr.) und Ignorieren mit einer Meldung. siehe Anhang.
Ich bekomme Ignorieren nicht mit rein und den Courser niht auf ArtNr. Eingabefeld.

Kann mir da jemand weiterhelfen

Gruß Jürgen.

  Artikeldaten.accdb (Größe: 764 KB / Downloads: 3) ]]>
ich möchte unter FrmArtikeldaten (Artikeldaten), nach der Eingabe für eine bereits vorhanden Primarschlüssel (ArtNr) eine Meldung ausgeben mit Abbrechen (Schließen), Wiederholen (Neuereintrag und Courser ins Feld ArtNr.) und Ignorieren mit einer Meldung. siehe Anhang.
Ich bekomme Ignorieren nicht mit rein und den Courser niht auf ArtNr. Eingabefeld.

Kann mir da jemand weiterhelfen

Gruß Jürgen.

  Artikeldaten.accdb (Größe: 764 KB / Downloads: 3) ]]>