Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Peut on traduire #N/A en VBA ?

  • Initiateur de la discussion Initiateur de la discussion Amilo
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Amilo

XLDnaute Accro


Bonsoir le forum,

j'ai une petite question, comment peut-on écrire par ex :

If [BBBB] = "#N/A" then

BBBB est par ex le nom de ma cellule A1

Merci d'avance
 
Re : Peut on traduire #N/A en VBA ?

Bonsoir Amilo, Lepzedfred

Regarde aussi l'aide sur "valeurs d'erreurs de cellule", tu y trouveras notament la procédure suivante qui regroupe tous les tests d'erreurs:

Code:
Worksheets("Sheet1").Activate
If IsError(ActiveCell.Value) Then
    errval = ActiveCell.Value
    Select Case errval
        Case CVErr(xlErrDiv0)
            MsgBox "#DIV/0! error"
        Case CVErr(xlErrNA)
            MsgBox "#N/A error"
        Case CVErr(xlErrName)
            MsgBox "#NAME? error"
        Case CVErr(xlErrNull)
            MsgBox "#NULL! error"
        Case CVErr(xlErrNum)
            MsgBox "#NUM! error"
        Case CVErr(xlErrRef)
            MsgBox "#REF! error"
        Case CVErr(xlErrValue)
            MsgBox "#VALUE! error"
        Case Else
            MsgBox "This should never happen!!"
    End Select
End If

@+

Gael
 
Re : Peut on traduire #N/A en VBA ?


Merci à vous pour votre réponse, je vais pouvoir les tester

Bonne nuit à tous
 
Re : Peut on traduire #N/A en VBA ?

Bonsoir à tous


Ou comme cela pour rester dans le ton


Bonsoir le forum,

j'ai une petite question, comment peut-on écrire par ex :

If [BBBB] = "#N/A" then

BBBB est par ex le nom de ma cellule A1

Merci d'avance


Code:
Sub macro()
If [IsNA(range("BBBB"))] = True Then MsgBox "test"
End Sub


EDITION
: pas rafraichi avant de poster, désolé.
 
Dernière édition:
Re : Peut on traduire #N/A en VBA ?



Bonsoir le forum,

j'ai une petite question, comment peut-on écrire par ex :

If [BBBB] = "#N/A" then

BBBB est par ex le nom de ma cellule A1

Merci d'avance

RE Bonsoir le forum,

désolé c'est encore moi, je pensais réussir mon code avec ceci mais il ne se passe rien, que la cellule nommée "no_ligne_facture" de l'onglet "formulaire" indique un N/A ou un chiffre !!

Voyez vous une erreur dans cette macro ??

En français, je veux dire que si la cellule nommée "no_ligne_facture" alors sors de la macro sinon supprime la ligne 2 de l'onglet "formaulaire"

Merci d'avance

Sub supprimer_facture()
'
' supprimer_facture Macro

If [IsError(range(no_ligne_facture))] = True Then Exit Sub
Sheets("Base de données").Rows("2:2").Delete Shift:=xlUp
Sheets("Formulaire").Select

End Sub
 
Re : Peut on traduire #N/A en VBA ?

RE... et bonsoir à gael et vbacrumble

attention à la syntaxe : en plus des guillemets, il suffisait d'enlever les crochets []

Code:
Sub supprimer_facture()
'
' supprimer_facture Macro
If IsError(Range([COLOR="Red"][B]"[/B][/COLOR]no_ligne_facture[COLOR="red"][B]"[/B][/COLOR])) = True Then Exit Sub
Sheets("Base de données").Rows("2:2").Delete Shift:=xlUp
End Sub

a+
 
Dernière édition:
Re : Peut on traduire #N/A en VBA ?


C'est toujours moi car je n'y ai toujours pas réussi, il ne se passe rien avec le code ci-dessus.

J'espère vous envoyer un fichier ex ce samedi après midi.

Bonne nuit à tous
 
Re : Peut on traduire #N/A en VBA ?

bizarre...

chez moi ça fonctionne....
La plage nommée no_ligne_facture existe-elle bien dans ton fichier?
Si oui, définie-elle bien une cellule unique et non une plage de cellules?
Si oui, Es-tu sur de l'orthographe de cette plage nommée reprise dans le code?

regarde le fichier joint, en A1 j'ai nommé la cellule no_ligne_facture, lances la procédure supprimer_facture et tu verras que rien ne se passe.
en D1, j'ai nommé la cellule no_ligne_facture2, si tu lances la procédure supprimer_facture2, la ligne 2 du feuillet Base de données est bien supprimée.

a+
 

Pièces jointes

Dernière édition:
Re : Peut on traduire #N/A en VBA ?

Bonjour à tous,

Juste une petite remarque, le "=True" n'est pas nécessaire dans cette instruction; on peut écrire:

Code:
If IsError(Range([B][COLOR=black]"[/COLOR][/B]no_ligne_facture[B][COLOR=black]"[/COLOR][/B])) Then Exit Sub

@+

Gael
 
Re : Peut on traduire #N/A en VBA ?


Bonjour le Forum, bonjour Ledzepfred, bonjour Gael, bonjour Vbacrumble

je viens de recomparer tous les codes et effectivement j'ai commis une erreur de crochets [].

Je n'ai pas fait attention à la phrase de Ledzepfred qui disait ceci
"attention à la syntaxe : en plus des guillemets, il suffisait d'enlever les crochets []"

Un des codes qui fonctionne et que j'utilise est donc (sans les crochets et avec ou sans True).


Sub supprimer_facture()

If IsError(Range("no_ligne_facture")) = True Then
Exit Sub
Else:
With Sheets("Base de données")
.Activate
.Rows([no_ligne_facture]).Delete Shift:=xlUp
End With
End If
End Sub

Mille Excuses pour ma maladresse, mille merci à tous !

Bon Week End à tous
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
113
Réponses
7
Affichages
187
Réponses
15
Affichages
830
Réponses
10
Affichages
417
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…