Thema Datum  Von Nutzer Rating
Antwort
31.08.2012 08:59:40 Math
NotSolved
Blau Datenfeld auf existenz Prüfen mit VBA
31.08.2012 13:32:04 Dekor
NotSolved
31.08.2012 19:31:03 Gast71057
NotSolved
31.08.2012 22:01:52 Dekor
NotSolved
01.09.2012 09:45:26 Gast7491
NotSolved
01.09.2012 09:45:27 Gast72817
NotSolved
01.09.2012 12:03:30 Gast71358
NotSolved
03.09.2012 12:30:58 Dekor
NotSolved
03.09.2012 17:14:01 Gast17697
NotSolved
04.09.2012 12:38:24 Dekor
NotSolved
05.09.2012 20:38:48 Gast94556
Solved
05.09.2012 20:38:48 Gast35671
NotSolved
13.09.2012 22:55:43 Gast45630
NotSolved
17.09.2012 12:38:39 Dekor
NotSolved
18.09.2012 12:45:57 Gast2823
NotSolved

Ansicht des Beitrags:
Von:
Dekor
Datum:
31.08.2012 13:32:04
Views:
2355
Rating: Antwort:
  Ja
Thema:
Datenfeld auf existenz Prüfen mit VBA

Hallo Math,

weiss nicht genau ob ich ds richtig verstanden habe, aber versuchs mal hiermit...

 

Sub Faktor()
   Dim rcsPlan As Recordset
   Dim eingabe As String
   Dim wert As String
   Dim DB As Database
   Dim Zeile as Long
   Dim Spalte as Long
   
   Zeile = 3  ' bitte an die Zeile anpassen
   Spalte = 4  ' bitte an die Spalte anpassen

   ' Wert aus einer externen Datentabelle ???
   'Set DB = CurrentDb
   'Set rcsPlan = DB.OpenRecordset("MyTable")
   'Wert =? rcsPlan.Fields("MyFeld").Value

   ' Wert aus der Exceltabelle ???
   Wert = Sheets("Tabelle1").Cells(Zeile, Spalte).Value

   eingabe = InputBox("geben Sie Materialnummer ein")

   If eingabe = wert Then
      'rcsPlan.Edit 
      MsgBox ("Materialnummer vorhanden")
   Else 
      MsgBox ("Materialnummer nicht vorhanden")
   End If
End Sub

Gruß Detlev


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
31.08.2012 08:59:40 Math
NotSolved
Blau Datenfeld auf existenz Prüfen mit VBA
31.08.2012 13:32:04 Dekor
NotSolved
31.08.2012 19:31:03 Gast71057
NotSolved
31.08.2012 22:01:52 Dekor
NotSolved
01.09.2012 09:45:26 Gast7491
NotSolved
01.09.2012 09:45:27 Gast72817
NotSolved
01.09.2012 12:03:30 Gast71358
NotSolved
03.09.2012 12:30:58 Dekor
NotSolved
03.09.2012 17:14:01 Gast17697
NotSolved
04.09.2012 12:38:24 Dekor
NotSolved
05.09.2012 20:38:48 Gast94556
Solved
05.09.2012 20:38:48 Gast35671
NotSolved
13.09.2012 22:55:43 Gast45630
NotSolved
17.09.2012 12:38:39 Dekor
NotSolved
18.09.2012 12:45:57 Gast2823
NotSolved