Problème avec boucle If

Signaler
Messages postés
40
Date d'inscription
vendredi 16 janvier 2009
Statut
Membre
Dernière intervention
29 octobre 2009
-
Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
-
Bonsoir tout le monde, j'ai un petit soucis pour réaliser une petite manip sous excel! J'ai une plage de valeurs sur une feuille excel qui se nomme Macro. Je voudrais transférer les valeurs inférieur à mille sur le classeur suivant! Le souci est que j'ai un problème avec ma boucle If... Je pense que le problème vient de la déclaration de variable, je me suis renseigné mais rien à faire je n'arrive pas à faire tourner cette condtion! Voici ce que j'ai tapé pour réaliser la manip, certainement que vous allez trouver cela étourdi mais je suis un débutant et ne demande qu'à apprendre!!

    Dim A As Range
    A=Range("Macro!B5:C65")
    If A < 1000 Then
    Range("C8:C60").Value = Range("Macro!B5:C65").Value
    End If

Merci de votre aide!!!!

3 réponses

Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
28
salut

Je ne suis pas expert VBA, mais il me semble que l'écriture suivante
ne veut rien dire

A=Range("Macro!B5:C65")

Ta feuille du classeur s'appelle bien Macro

Avec une valeur dans la case A1 le code suivant fonctionne

Sub test1()
Dim a As Integer
a = Range("Feuil1!A1:A1").Value

MsgBox a

End Sub
Messages postés
40
Date d'inscription
vendredi 16 janvier 2009
Statut
Membre
Dernière intervention
29 octobre 2009

Salut, merci de te préoccuper de mon problème! Cependant j'ai essayé ton code et j'ai une erreur 400! J'ai bien copié une valeur dans la cellule A1 de la feuill1 et j'ai écrit le code pour la feuill2 mais rien à faire!
Messages postés
6063
Date d'inscription
dimanche 13 avril 2003
Statut
Modérateur
Dernière intervention
15 juillet 2011
28
Pas la feuille 11 mais 1

Moi ca focntionne sur 2007 meme sans valeur ca ressort 0