IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

VBA avec Find [XL-2003]


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé Avatar de Maiden002
    Profil pro
    Étudiant
    Inscrit en
    Juillet 2009
    Messages
    137
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2009
    Messages : 137
    Par défaut VBA avec Find
    Bonjour,

    j'ai un petit probléme avec mon code VB

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Set c = Worksheets("Error Report").Columns(4).Find(feuille)
                            If Not c Is Nothing Then
                                    LiToDelete = c.Row
                                    Rows(LiToDelete).Delete
                            End If
    Je pense que je lé mal synthaxé.

    Dans c, je recherche dans quelles lignes de la colonnes 4(D) je trouve la valeur de ma variable feuille. J'ai donné la variable LiToDelete (ligne a supprimer) pour pouvoir ensuite supprimer directement ma ligne d'un coup.

    Je pense que je mi suis mal pris. Quelqu'un pourrai m'aider


    Merci beaucoup

  2. #2
    Membre Expert Avatar de Krovax
    Profil pro
    Inscrit en
    Juillet 2008
    Messages
    1 888
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : France

    Informations forums :
    Inscription : Juillet 2008
    Messages : 1 888
    Par défaut
    Bonjour
    Quel est le problème ?
    Chez moi le code fonctionne mais j'ai du déclarer les variables et modifier le nom de l'onglet.

    TU n'effectu qu'une recherche donc si il y a plusieurs cellule contenant la valeur chercher seule la première sera trouvé.

  3. #3
    Membre confirmé Avatar de Maiden002
    Profil pro
    Étudiant
    Inscrit en
    Juillet 2009
    Messages
    137
    Détails du profil
    Informations personnelles :
    Âge : 36
    Localisation : France

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Juillet 2009
    Messages : 137
    Par défaut
    Oui en faite sa marche, c'est parce que je voulai que sa supprime dans un autre feuille mais j'avais oublier de spécifié laquel avec Worksheets("")...


    Par contre pourrai tu m'éclairer sur les Validation de Données.

    j'ai mon code qui modifie une validation de données ou il prend la validation avec Worksheets("Lang").Range("cmbLang").Validation.Formula1

    J'ai une deuxieme validation de données mais j'essaye en changeant en Formula2 sa ne marche pas. Saurai tu pourquoi?

    merci

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [XL-2007] VBA Selection find avec valeur non trouvé
    Par WAS92 dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 18/02/2013, 15h02
  2. Problème avec Find(), Excel Vba
    Par mmmxtina dans le forum Macros et VBA Excel
    Réponses: 12
    Dernier message: 28/05/2009, 11h57
  3. [ADO] Probleme avec Find
    Par Galaad dans le forum Access
    Réponses: 3
    Dernier message: 06/01/2006, 11h24
  4. Ajouter un enregitrement a une table vide en VBA avec access
    Par Mateache dans le forum VBA Access
    Réponses: 4
    Dernier message: 03/01/2006, 15h36
  5. [VBA Excel] problème de range avec find
    Par loacast dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 23/11/2005, 13h56

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo