J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26.
Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la
valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value
.....
If Derlign_PG Is Not numerique Then
Derlign_PG = Range("G24").Value
Else
.......
End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous
comment faire pour tester cette condition.
Merci d'avance.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ChrisV
Bonjour lolo,
... Derlign_PG = [G26] If Not IsNumeric(Derlign_PG) Then Derlign_PG = [G24] Else ...
ChrisV
"lolo" a écrit dans le message de news: 438b9f43$0$1804$
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26. Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value ..... If Derlign_PG Is Not numerique Then Derlign_PG = Range("G24").Value Else ....... End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous comment faire pour tester cette condition. Merci d'avance.
Bonjour lolo,
...
Derlign_PG = [G26]
If Not IsNumeric(Derlign_PG) Then
Derlign_PG = [G24]
Else
...
ChrisV
"lolo" <deadhunter@libertysurf.fr> a écrit dans le message de news:
438b9f43$0$1804$626a14ce@news.free.fr...
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26.
Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la
valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value
.....
If Derlign_PG Is Not numerique Then
Derlign_PG = Range("G24").Value
Else
.......
End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous
comment faire pour tester cette condition.
Merci d'avance.
... Derlign_PG = [G26] If Not IsNumeric(Derlign_PG) Then Derlign_PG = [G24] Else ...
ChrisV
"lolo" a écrit dans le message de news: 438b9f43$0$1804$
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26. Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value ..... If Derlign_PG Is Not numerique Then Derlign_PG = Range("G24").Value Else ....... End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous comment faire pour tester cette condition. Merci d'avance.
lolo
Bonjour ChrisV
Merci pour la soluce. J'étais resté sur un truc Is Not que j'avais essayé un peu dans tous les sens.
Encore merci.
Bonjour lolo,
... Derlign_PG = [G26] If Not IsNumeric(Derlign_PG) Then Derlign_PG = [G24] Else ...
ChrisV
"lolo" a écrit dans le message de news: 438b9f43$0$1804$
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26. Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value ..... If Derlign_PG Is Not numerique Then Derlign_PG = Range("G24").Value Else ....... End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous comment faire pour tester cette condition. Merci d'avance.
Bonjour ChrisV
Merci pour la soluce. J'étais resté sur un truc Is Not que j'avais
essayé un peu dans tous les sens.
Encore merci.
Bonjour lolo,
...
Derlign_PG = [G26]
If Not IsNumeric(Derlign_PG) Then
Derlign_PG = [G24]
Else
...
ChrisV
"lolo" <deadhunter@libertysurf.fr> a écrit dans le message de news:
438b9f43$0$1804$626a14ce@news.free.fr...
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26.
Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la
valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value
.....
If Derlign_PG Is Not numerique Then
Derlign_PG = Range("G24").Value
Else
.......
End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous
comment faire pour tester cette condition.
Merci d'avance.
Merci pour la soluce. J'étais resté sur un truc Is Not que j'avais essayé un peu dans tous les sens.
Encore merci.
Bonjour lolo,
... Derlign_PG = [G26] If Not IsNumeric(Derlign_PG) Then Derlign_PG = [G24] Else ...
ChrisV
"lolo" a écrit dans le message de news: 438b9f43$0$1804$
Salut à tous,
J'ai une variable DernLign_PG qui recoit la valeur de la cellule G26. Si en G26, je n'ai pas de valeur numérique, alors DernLign_PG recoit la valeur de G24.
J'ai écrit ceci :
Derlign_PG = Range("G26").Value ..... If Derlign_PG Is Not numerique Then Derlign_PG = Range("G24").Value Else ....... End If
Le mot numerique n'est pas présent à premiere vue en VBA. Savez vous comment faire pour tester cette condition. Merci d'avance.
