hvordan angiver en værdi

Du kunne evt. bruge formlen: er.tal(dansk version), der returnere værdien sand, hvis cellen den tester er et tal, og falsk hvis den ikke er.

ASKIMS

Jeg tror, at funktionen VÆRDITYPE(værdi), der giver et 1-tal når \"værdi\" er et tal, 2, når det er en tekst o.s.v. kan bruges her

JA MEN HVAD SKRIVER JEG I PARENTESEN

Måske:

If VÆRDITYPE(Range(\"G6\").Value) = 1 Then

Venligst vjorgensen

hvad skal der stå ved værditype når det er tekst

VÆRDITYPE kommer ud med et 2-tal, når G6 indeholder en tekst

min koder ser sådan ud og den melder en fejl om der står noget i g6 eller ej

Private Sub CommandButton3_Click()
Application.ScreenUpdating = False
If VÆRDITYPE(Range(\"G6\").Value) = 1 Then
MsgBox \"DU HAR ET NUMMER\"
ElseIf Range(\"G6\").Value = \"\" Then
End If
Exit Sub

Prøv følgende: gem VÆRDITYPE(G6) i f.eks. celle G7 og skriv: If Range(\"G7\").Value = 1 Then i makroen - det burde virke.

jeg tror ikke jeg fatter en skid ,alle celler på mit ark er optaget det jeg gør når jeg trykker på command knappen er at jeg får tildelet et nummer i  celle G6 og for ikke at tage et nummer mere end en gang ,skal jeg have besked om det og gå ud af koden igen det stykke koder her er kun en lille del af hele koden (fra starten)og hvis jeg har taget et nummer, dur det ikke jeg kører resten af kode, så går det hele i fisk for mig

Nyt forslag: Hvad med funktionen IsNumber, det er en boolsk funktion, når den er lig TRUE har du et tal

som jeg har vist koden virker den omvendt så må forskellen være minimal jeg skal bare angive en værdi i parantesen og den vil starte med en tekst efterfulgt af et nummer

Det forstår jeg til gengæld ikke meget af; virker IsNumber for dig?

Du må kunne teste på om det er et tal, som jeg jeg foreslog. Du kan se parametrene til denne i excels-hjælpefil. Du kunne evt. lave to kolonner (og skjule dem, hvis brugeren ikke skal kunne se dem). I den ene kolonne tester du om det er en værdi og i den anden om det er en tekst(er.text el. IsText), så kan makroen kigge på om værdien \"Sand/True\" er i en af de to kolonner.

det er ikke en formel eller makro jeg kører, men programering i VB ,og det kan være der problemet er, jeg ved at tekst hedder String der er simpelthen formuleringen der er forkert hvis ikke der står noget i cellen får jeg beskeden i en msgbox \"du har et nummer\" og og det var når der stå noget i cellen det skulle komme.

Isnumber eller IsText hvor og hvordan mener du linien skal se ud

For at kunne bruge IsNumber er du nødt til at erklære den, da det er en worksheetfunction, ligesom du er nødt til at specificere din Range som et object:
Her er forudsat at det aktuelle ark hedder Ark1:

Dim MyRange As Range
Dim taltjek As Boolean

Set MyRange = Worksheets(\"Ark1\").Range(\"G6\")
taltjek = Application.WorksheetFunction.IsNumber(MyRange)
If taltjek = True Then
MsgBox \"DU HAR ET NUMMER\"
ElseIf Range(\"G6\").Value = \"\" Then
End If
Exit Sub

Såvidt jeg kan se skal du foriøvrigt have flyttet din Exit Sub kommando ind i If-løkken, ellers vil Exit gælde i alle tilfælde?!?

Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
If Range(\"G6\").Value <> \"\" Then (denne linje tester for tekst)
MsgBox \"DU HAR TAGET ET NUMMER\"
Exit Sub
ElseIf Range(\"G6\").Value = \"\" Then (er det en bestemt tekst skal den stå i melem \"  \")
End If

Sådan ser min kode ud nu og den virker det er muligt at det kan gøres på flre måder jeg har ikke afprøvet dit forslag endnu

mange tak for hjælpen det virker nu gonzoo ;-)