Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Erreur d'affectation de valeur à une variable.

Erreur d'affectation de valeur à une variable.

6 réponses
Avatar
Patrick BASTARD
Bonsoir, toutes et tous.

J'ai (encore...) besoin de votre aide :
La ligne 4 (affectation de i) me renvoie une erreur 13 : incompatibilité de
type.

Quelle erreur ai-je commise ?
Comment puis-je la corriger ?
************************
Dim i As Byte
Dim j As Byte
i = Application.Match(Sheets("Feuil2").[B4], Range("DeuxiemeChoix"), 0)
j = 14 * i + 15
Sheets("Validations").Activate
Rows("j:j").Select
************************
Avec mes remerciements anticipés,
--
Bien amicordialement,
P. Bastard
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
Avatar
Youky
Salut bien,
j et pas "j:j" (en bas)
Rows(j).Select
Youky

"Patrick BASTARD" a écrit dans le
message de news:
Bonsoir, toutes et tous.

J'ai (encore...) besoin de votre aide :
La ligne 4 (affectation de i) me renvoie une erreur 13 : incompatibilité
de type.

Quelle erreur ai-je commise ?
Comment puis-je la corriger ?
************************
Dim i As Byte
Dim j As Byte
i = Application.Match(Sheets("Feuil2").[B4], Range("DeuxiemeChoix"), 0)
j = 14 * i + 15
Sheets("Validations").Activate
Rows("j:j").Select
************************
Avec mes remerciements anticipés,
--
Bien amicordialement,
P. Bastard



Avatar
Patrick BASTARD
Bonjour, *Youky*

Ce serait donc une deuxième erreur, (Ah, ces amateurs...) mais ma macro
s'arrête avant :
i = Application.Match(Sheets("Feuil2").[B4], Range("DeuxiemeChoix"), 0) j =
14 * i + 15

Merci de ton aide.
--
Bien amicordialement,
P. Bastard

Salut bien,
j et pas "j:j" (en bas)
Rows(j).Select
Youky

"Patrick BASTARD" a écrit dans le
message de news:
Bonsoir, toutes et tous.

J'ai (encore...) besoin de votre aide :
La ligne 4 (affectation de i) me renvoie une erreur 13 :
incompatibilité de type.

Quelle erreur ai-je commise ?
Comment puis-je la corriger ?
************************
Dim i As Byte
Dim j As Byte
i = Application.Match(Sheets("Feuil2").[B4], Range("DeuxiemeChoix"),
0) j = 14 * i + 15
Sheets("Validations").Activate
Rows("j:j").Select
************************
Avec mes remerciements anticipés,
--
Bien amicordialement,
P. Bastard




Avatar
JpPradier
Bonsoir Patrick

Peut-etre qu'il ne trouve pas Le contenu de B4 dans DeuxiemeChoix ?

j-p
Avatar
isabelle
bonjour Patrick,

i As Byte (nombres entiers positifs compris entre 0 et 255),
se serait mieux i As Long (valeur est comprise entre -2 147 483 648 et 2 147 483 647.)
pour les ligne supérieur à 255

isabelle

Bonsoir, toutes et tous.

J'ai (encore...) besoin de votre aide :
La ligne 4 (affectation de i) me renvoie une erreur 13 : incompatibilité de
type.

Quelle erreur ai-je commise ?
Comment puis-je la corriger ?
************************
Dim i As Byte
Dim j As Byte
i = Application.Match(Sheets("Feuil2").[B4], Range("DeuxiemeChoix"), 0)
j = 14 * i + 15
Sheets("Validations").Activate
Rows("j:j").Select
************************
Avec mes remerciements anticipés,


Avatar
Patrick BASTARD
Bonsoir, *JpPradier*

Peut-etre qu'il ne trouve pas Le contenu de B4 dans DeuxiemeChoix ?


Bingo !
Un test sur B4 avant, et le tour est dans le sac.

Merci.


--
Bien amicordialement,
P. Bastard

Avatar
Patrick BASTARD
Bonsoir, *isabelle*

i As Byte (nombres entiers positifs compris entre 0 et 255),
se serait mieux i As Long (valeur est comprise entre -2 147 483 648
et 2 147 483 647.) pour les ligne supérieur à 255


i varie entre 15 et 155, mais je ne l'aiais pas précisé..

Merci cependant pour ta remarque.

Le problème a été décelé par JPP, et est maintenant résolu.

--
Bien amicordialement,
P. Bastard