• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

exceptie in textboxen

Status
Niet open voor verdere reacties.

johndirk

Gebruiker
Lid geworden
17 aug 2009
Berichten
167
hallo allemaal

IK wil als records 2 keer bestaat worden niet ingevoerd in mijn excel file in mijn form.
ik heb de volgende procedure bedacht:
Procedure
1 – open mijn xls file
2 – na controle van de record bestaat in mijn xls file
3 – for i=1 to iRow- 1
4 – append all textboxes in een string en rijen data in kolom A to D in andere string
5 – vergelijk textbox met de rijen A tot D
6 – if gelijk dan record bestaat msgbox “ record bestaat”
7 - if not gelijk than mijn procedure schrijf de record
8 – na schrijven in xls save as xls sheet wordt ingevoerd anders nieuwe record wil niet verschijnen in file.
9 - Close mijn xls file.

Indien mijn vraag onduidelijk is graag ook even een reactie dan probeer ik hem verder toe te lichten.
 

Bijlagen

  • RecordCheck-John.xls
    38 KB · Weergaven: 33
Laatst bewerkt:
exceptie textbox

mijn form
 

Bijlagen

  • RecordCheck-John1.xls
    43,5 KB · Weergaven: 37
hallo allemaal

ik ben bijna klaar met mijn formulier in visual basic.
ik wil in de knop formulier in de editbox: txtPhone geen tekst wordt getypt.
dit is een telefoon nummer dus gewoon nummers in txtphone moet ingevuld wordt.

heeft iemand een idee?

procedure exceptie
1 - if een text wordt ingevoerd in txtphone than messagebox verschijnt: "Alleen nummers typen"
2 - else wordt nummer ingevoerd.

Indien mijn vraag onduidelijk is graag ook even een reactie dan probeer ik hem verder toe te lichten.

Neem eens een kijkje op deze pagina daar staat wat uitleg over " textbox for numbers only "
 
exceptie textbox

Trucker u had gelijk het kan.
ik heb nog een fout in mijn form de volgende button en de vorige button wont work.
waar maak ik de fout?
 

Bijlagen

  • RecordCheck-John(2).xls
    50 KB · Weergaven: 39
Trucker u had gelijk het kan.
ik heb nog een fout in mijn form de volgende button en de vorige button wont work.
waar maak ik de fout?

Kijk eens naar de optie spinbutton om de actie vorige / volgende te verwezenlijken
 
Re: Record check

ik heb de optie van spinbutton opgezoekt.

ik krijg een foutmelding bij volgende knoppen.
ziet iets fout in de procedure volgende en vorige:

Private Sub cmdNext_Click()
' Save form contents before changing rows:
SaveRow
' Increment row number:
lCurrentRow = lCurrentRow + 1
' Show contents of row in the form:
LoadRow
End Sub

Private Sub cmdPrevious_Click()
' Show previous only if not already in first row:
If lCurrentRow > 1 Then
' Save form contents before changing rows:
SaveRow
' Decrement row number:
lCurrentRow = lCurrentRow - 1
' Show contents of row in the form:
LoadRow
End If
End Sub
 
johndirk,

Is deze code misschien wat?
Code:
Private Sub txtPhone_Change()
If txtPhone.Value = "" Then
Exit Sub
End If
If IsNumeric(txtPhone.Value) Then
Exit Sub
Else
MsgBox ("Sorry, only numbers allowed")
txtPhone.Value = ("")
End If
End Sub
 
exceptie textbox

heelveel bedankt voor uw bericht
ja dat was het Hoornvan veel dank
 
ik heb deze site gezien
bedankt trucker 10

Op die site staat alles wat je nodig hebt , als je textboxen bijzet moet je deze ook in de code bijzetten en voorzien van dezelfde naam .
 

Bijlagen

  • RecordCheck-John(daniel)(1).xls
    70 KB · Weergaven: 55
Beste johndirk ;)

hallo allemaal

hallo allemaal

IK wil als records 2 keer bestaat worden niet ingevoerd in mijn excel file in mijn form.

Waarom deze topic sluiten als je vraag nog niet is opgelost :confused:

Met de code in je bestandje kan je nog steeds 2 dezelfde records invoeren.

OF heb ik iets over het hoofd gezien.

Groetjes Danny. :thumb:
 
Laatst bewerkt:
Re: Record check

bedankt Danny voor uw reactie

ik dacht de probleem was te ingewikkeld.
kan een record in database wordt gecontroleerd in form
daarna ik krijg niet zoveel double records?
 
Laatst bewerkt:
Re: Record check

bedankt voor jou antwoord en adviezen trucker10

ik kan nu een form maken in vba.
Ik heb een andere exceptie probleem:
IK wil als records 2 keer bestaat worden niet ingevoerd in mijn excel file in mijn form.
ik heb de volgende procedure bedacht:
Procedure
1 – open mijn xls file
2 – na controle van de record bestaat in mijn xls file
3 – for i=1 to iRow- 1
4 – append all textboxes in een string en rijen data in kolom A to D in andere string
5 – vergelijk textbox met de rijen A tot D
6 – if gelijk dan record bestaat msgbox “ record bestaat”
7 - if not gelijk than mijn procedure schrijf de record
8 – na schrijven in xls save as xls sheet wordt ingevoerd anders nieuwe record wil niet verschijnen in file.
9 - Close mijn xls file.

natuurlijk kan op verschillende maniren 2Xrecord in de form textbox voorgekomen worden. kan dit procedure uitgevoerd worden in excel?
 
bedankt voor jou antwoord en adviezen trucker10

ik kan nu een form maken in vba.
Ik heb een andere exceptie probleem:
IK wil als records 2 keer bestaat worden niet ingevoerd in mijn excel file in mijn form.
ik heb de volgende procedure bedacht:
Procedure

natuurlijk kan op verschillende maniren 2Xrecord in de form textbox voorgekomen worden. kan dit procedure uitgevoerd worden in excel?

johndirk , je kan nu idd een form maken ( overschrijven ) op het ogenblik dat je der textboxen bijzet moet je deze dan ook overal in je code aanpassen . Er kan ook een controle gebeuren op reeds bestande item dit zou via een UDF kunnen en op wat ga je controleren ik vermoed enkel maar op het telefoonnummer want de naam / straat / postcode kan aan meerdere mensen toebehoren , ik zie de link niet met je ""for i=1 to iRow- 1" .
Post anders hier in deze topic eens wat je aan het proberen bent .
 
Re: Record check

bedankt voor uw snelle reactie trucker10

Ik heb een database van 900 records.
Ik wil niet meer double records wordt getypt in mijn excel file.
ik wil als een record bestaat in de database dan bericht "twee gelijke record" anders een record invullen in database.
( twee gelijke record wordt herkend in form tijdens invullen form)

A1: name B2: Adres C2:postcode D2: Telefoon (controle 4 column)
Ik wil als een naam is gelijk aan 4 column wordt niet via de form getypt

ik was van plan de 4 column als string laat zien en de 4 textboxen ook als string dan met elkaar vergelijken.(controle database):rolleyes:

Indien mijn vraag onduidelijk is graag ook even een reactie dan probeer ik hem verder toe te lichten.
 
Laatst bewerkt:
Beste johndirk ;)

Probeer deze code in je bestandje te verwerken.

Deze code zoekt naar een dubbel Tel. Nr.

Code:
    Dim FindString As String, Rng As Range
    FindString = txtPhone.Value
    If Trim(FindString) <> "" Then
        With Sheets("Blad1").Range("D2:D1000")
            Set Rng = .Find(What:=FindString, After:=.Cells(1), LookIn:=xlValues, LookAt:=xlWhole, _
                            SearchOrder:=xlByRows, SearchDirection:=xlPrevious, MatchCase:=False)
            If Not Rng Is Nothing Then
                MsgBox "This Phone Nr. is already used. Please put another Phone Nr.in!", vbInformation, "Dubble Phone.number"
                txtPhone = ""
                txtPhone.SetFocus
            Else
                Exit Sub
            End If
        End With
    End If

Weet niet of ze werkt.
Ik heb ze aangpast uit een ander bestandje.

Groetjes Danny. :thumb:
 
Re: Record check

bedankt voor uw antwoord

een record telefoneren controleren vermindert mijn werk
maar soms komen familie met dezelfde telefoon.
dan moet controleren op de voornaam en telefoon.

eigenlijk danny kan 2 kolommen gecontroleerd worden dan schrijven in de database?
 
Laatst bewerkt:
bedankt voor uw antwoord

maar soms komen familie met dezelfde telefoon.
dan moet controleren op de voornaam en telefoon.

Als het telefoon nummer al dubbel is waarom dan nog een extra controle op de naam . nomkel jan heeft nr 123456 tante trees heeft ook nr 123456 dan zal 1 van de twee er niet inkunnen
 
Laatst bewerkt:
Re: Record check

bedankt Trucker10 voor uw reactie

verschillende kinderen van de familie hebben met andere voornamen en zij kunnen thuis wonen met dezelfde telefoon.
ik moet ook kunnen dit soort mensen ook invoeren als het kan.
Voornaam en Telefoon controleren (kolom A,kolom D)

ik wil met een macro dit oplossen
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan