Résultats de la recherche

  1. E

    copier coller que les valeurs positives

    Bonjour tout le monde ,je cherche sans trouver je fais donc un appel .......merci ! je souhaiterais copier (a1:a10)feuil 1 ,et coller en (c1:c10)feuil 2 , mais uniquement les valeurs positives (en vba) Merci pour toutes vos idées ou solutions... Evelyne
  2. E

    Application.Dialogs(xlDialogFormulaFind

    Bonjour tout le monde Est il, possible de limiter « Application.Dialogs(xlDialogFormulaFind).Show » à deux onglets définis ou plus précisément limiter la recherche a deux onglets pour ne pas rechercher dans tout le classeur Merci pour toutes vos sujétions bonne journée evelynetfrancois
  3. E

    ne garder que les cellules remplies en majuscules

    bonsoir tout le monde est ce possible ? j ai une feuille avec , pour l'exemple des menus diverses.... j aimerais ne garder que les valeurs écrites en majuscules je joins un classeur pour tenter d être plus explicite merci pour toutes vos idées bonne soirée Evelyne et François
  4. E

    colorer la premiere cellule de chaque groupe de mots (tjrs séparés par une ligne)

    Bonjour tout le monde Dans la colonne "A" j ai des groupes de mots, toujours séparés par une ligne vide. Comment en VBA , colorer le premier mot de chaque groupe Merci d'avance pour toutes vos propositions Bonne journée à tous.... evelynetfrancois
  5. E

    Ne garder que le texte en minuscule

    bonjour tout le monde je cherche a faire une macro expliquée par l exemple ci dessous en espérant être clair For Each Cell In Range("c2:w50") If Cell.Value <> "" Then Cell.Value = "Ok" donc : Si la cell n’est pas vide alors ca note « OK » Ex : BATEAU ____ devient donc « OK »...
  6. E

    supprimer tous les x sauf les premiers de chaque colonnes

    Bonjour à toutes et tous j aurais besoin d un coup de main en VBA je voudrais supprimer tous les X d une feuille sauf les premiers de chaque colonne j ai joint un fichier pour être plus clair (Je ne suis pas dans l’urgence ....) Un grand merci d’avance Bonne journée a tous...
  7. E

    Sélectionner une zone variable ActiveCell.Offset(1, -3)

    Bonjour tout le monde je cherche à sélectionner une petite zone ( un cadre), qui se trouve toujours sous la cellule active ( activecell qui n'est pas toujours la même) Mon idée pour trouver cette zone que je souhaite sélectionner ActiveCell.Offset(1, -3).Offset(14, 7).Select Évidement ca...
  8. E

    Donnée/validation /liste

    Bonsoir à tous Donnée/validation /liste : l'aperçu dans la cellule semble défini à 8 lignes non paramétrables . ? MERCI pour vos infos Bonne soirée E et F
  9. E

    Private Sub Worksheet_Change(ByVal Target As Range)

    Bonjour tout le monde J’essaye de simplifier mes macros ... Quand sur chaque feuille j ai un " Private Sub Worksheet_Change(ByVal Target As Range) " je note ma macro à la suite, et ça fonctionne très bien..... Cependant comme j ai 30 feuilles, je note donc la même macro sur ces 30...
  10. E

    Trier plusieurs colonnes independamment l une de l autre

    Bonsoir tout le monde Je voudrais simplifier une de mes macros Pour trier 30 colonnes indépendamment l une de l autre Je note pour la colonne A Columns("A:A").Select Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, OrderCustom:=1, MatchCase:=False...
  11. E

    ne pas passer par Private Sub Worksheet_Activate()

    Bonjour tout le monde ... Voila j expose mon soucis.. Dans ma macro ,suite à un "Sheets("blabla").Select" vba passe par Private Sub Worksheet_Activate() Est t il possible de contourner ce Worksheet_Activate? Merci beaucoup d'avance pour toutes vos suggestions bonne après midi E et F
  12. E

    choisir une liste d articles

    Bonjour a tous Est-ce que ça vous parait possible ou pas ? J ai une 20 ène de listes nommées, est il possible d avoir la liste correspondante à la valeur "écrite" dans la cellule Si "j écris" MOTO dans la cellule , la liste nommée MOTO apparaît après un clic sur cette même cellule...
  13. E

    perte de tous les controles apres c /coller

    bonjour tout le monde Depuis ce matin , lorsque je fais un copier coller dans un programme la feuille se copie normalement mais aucun contrôles ne suis , ....excel 2007 Suite a une mise a jour de microsoft je suppose ? Ca vous parle ? bonne journée a tous E et F
  14. E

    selectionne rtoutes les feuilles d un classeur sauf deux

    bonjour tout le monde je cherche un exemple de macro pour sélectionner "toutes les feuilles" d un classeur sauf "deux précises" toutes les feuilles= leur nombre peut varier , les deux précises= reste toujours les mêmes MERCI d avance pour votre coup de main je joins un fichier , si...
  15. E

    If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") Then

    bonsoir tous le monde juste un petit soucis peut on écrire en vba If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") Then si oui comment ? merci pour tout ps : ce n est pas urgent du tout EetF
  16. E

    pave numerique qui se coupe tt seul?

    bonjour tout le monde ... Au lancement d'un programme , j ai un usf qui demande qq renseignements 'nom et code ; quand je valide , le pave numerique se coupe , bien que ma macro n aborde pas du tout le pave avec F8 c est ok , pas de coupures ! auriez vous une explication ? merci d avance...
  17. E

    Cette image est trop grande et va etre tronquée

    annule annule
  18. E

    Afficher ou cacher lesq onglets dans excel 2007 ?

    Bonjour tout le monde je cherche désespérément la fonction onglets (afficher /masquer) dans les personnalisations de barre, et je ne trouve rien ! Vous l'avez vous ? Bien sur je peux créer la macro, mais pourquoi faire un doublon si la fonction est déjà prévue Sinon je connais le chemin...
  19. E

    format celulle pour nombre simple

    bonjour pouvez vous m aider ? je recherche ,pour une colonne , un format de nombre me donnant 12 si le nombre est entier et 0.250 pour un nombre avec décimales le tout restant des nombres et ( non du texte) additionnables merci pour vos sujetions bon apres midi a tous E et F
  20. E

    supprimer valeur des cellules contigues

    bonsoir tout le monde j essaye un truc qui ne doit pas être complexe mais je trouve pas !!! Dim cell As Range For Each cell In Range("ad8", "ad40").End(xlUp) 'ma plage de cellules If cell.Value = "" Then ' donc si la cell est vide cell.Offset(0...