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:
2608		 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...

 

?
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
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:
WYSIWYG-Editor, ctl00_Content_editor1



  • 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