Discussion :

[alexxx69]

Bonjour,

Je bloque sur une bétise en VBA.

J'aimerais renvoyer le type d'une variable contenue dans une cellule, je m'explique, j'ai dans une colonne des dates avec pour chaque fin de semaine une ligne récapitulative et j'aimerais que mon code saute cette cellule qui contient "semaine ..." au lieu d'une date.

A-t-on la possibilité de savoir quel type de donnée est dans ma cellule comme ça je met que si le type de la cellule est différent d'une date, il passe à la suivante.

Merci d'avance

[AlainTech]

Je pense que, le plus simple, est d'utiliser les "Fonctions Excel utilisables en VBA".

Si je me souviens bien, il y a un IsDate parmis elles.

[Igloobel]

Je le ferais par un petit if

je test le contenu de la cellule
je prend la valeur gauche (7premiers cractère)
si cette valeur est égale à "semaine" alors je saute une ligne

et le tout dans une boucle sur le nombre de ligne nécessaire

Igloobel

[zazaraignée]

Salut

Fonction VarType. L'explication est dans l'aide de VBA. Dans l'éditeur, tu papes VarType et tu appuie sur F1. Devrait y avoir un exemple.

Méfies toi cependant des valeurs numériques. Cette fonction reverra toujours le type Decimal pour les valeurs numériques si tu y mets l'adresse d'une cellule en paramètre. Même résultat si tu envoie le contenu de la cellule dans une variable (de type Variant).

[alexxx69]

Merci pour vos réponses mais j'ai pu me débrouiller autrement car c'était ultra pressé, en fait j'ai renvoyé le format de la cellule dans une variable :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
 
mavar = Wsheet1.cells(ligne,1).numberformat
 
if mavar = "@" then ligne = ligne + 1

La cellule contenant "Semaine ..." étant de format texte, mavar prend la valeur "@"