Résultats de la recherche

  1. G

    Objets Visible ou Pas ?

    Re : Objets Visible ou Pas ? re, et voila ma question idiote du jours !!! merci à vous, bonne journée Géraldine
  2. G

    Objets Visible ou Pas ?

    Re : Objets Visible ou Pas ? je suis désolée de relancer le post pierrot, mais je n'arrive toujours pas à résoudre mon problème sur les shapes et formes automatiques. J'ai joint un fichier (creer sous excel 2003) pour l'essai, peut être que je me trompe de nom, et si c'est le cas je n'arrive...
  3. G

    Effacer ligne selon reference

    Re : Effacer ligne selon reference bonjour pierrot, mais bien sure c'est une evidence, j'y avais pensé, hum hum ...mais je voulais être sûre de tes compétences, et elles me paraissent bonnes. J'ai retenu ton code : If Not x Is Nothing Then Range(x, x.Offset(0, 10)).GegeestContenteMerci
  4. G

    Effacer ligne selon reference

    Re : Effacer ligne selon reference ok merci pierrot, c'est la ligne complete que je veux effacer (colonne a aussi), je vais mettre comme cela If Not x Is Nothing Then Range(x.Offset(0, 0), x.Offset(0, 10)).ClearContents merci et bonne fin de journée, Géraldinement
  5. G

    Effacer ligne selon reference

    Re : Effacer ligne selon reference re pierrot et merci, sur le code ça efface uniquement la colonne E, je reflechis afin d'adapter .... quoi si mon etat psycologique me le permet :eek: If Not x Is Nothing Then x.Offset(0, 4).ClearContents @ merci bonne journée
  6. G

    Effacer ligne selon reference

    Bonjour, J'ai un petit souci de code sur, voir le fichier joint, je veux que le bouton "supprimer" efface la ligne selon la reference en a1 merci à tous, geraldine
  7. G

    Userform et As Range ...

    Re : Userform et As Range ... et c'est bien ça merci banzai, je vais corriger tout ça et kiki je vais regarder ce que t'as fait, merci et bonne journée @
  8. G

    Userform et As Range ...

    Re : Userform et As Range ... non pour kiki, mais banzai tu as peut etre raison je regarde
  9. G

    Userform et As Range ...

    Re : Userform et As Range ... bonjour banzai, j'avais essayé aussi, mais non pas as string, @
  10. G

    Userform et As Range ...

    Bonjour, J'ai un petit problème d'adaptation d'un code simple Dans mon userform, j'ai une textbox qui stipule "OUVRAGE" ou "ARTICLE" selon la demande, et donc si "OUVRAGE" on vas chercher les infos dans feuille ouvrage et si "article" dans feuille article. Je ne vois pas ce qui ne vas pas ...
  11. G

    textbox et format date

    bonsoir, j'ai un petit souci de textbox et format date, à l'ouverture d'une userform, textbox = cellule B2 "30 novembre 2007" la textbox donne le format 30/11/2007 pourquoi ? et si je veux "30 novembre 2007 !! non mais alors !! @ géraldine dine dine
  12. G

    Conseil pour modif du code

    Re : Conseil pour modif du code merci pierrejean corrigé comme cela .Formula = "='" & chemin & "\[" & tableau(x) & "]ADMIN" & "'!" & "B6" / supprimer Amicalement Géraldine PS : avec ceci je vais peut etre arrivé à corriger un autre code si j'ai un problème je relancerais le post.
  13. G

    Conseil pour modif du code

    Bonjour le forum, un petit conseil sur la modification d'un de mes codes : le code avant : Direction = Dir("d:\DEVIS\*.xls") le code après : Chem = Sheets("Accueil").Range("A19") ' est égal à d:\devis\ Direction = Dir(Chem & "*.xls") dans le code suivant j'ai du mal à adapter la...
  14. G

    Msgbox vbYesNo ?

    Re : Msgbox vbYesNo ? peu de reflexion m'on poussé à trouver, Dim a As Long If OptionButton1 = True Then a = MsgBox("Voulez-vous vraiment supprimer ce poste!", vbYesNo + vbExclamation, "Avertissement") If a = vbNo Then bonne journée
  15. G

    Msgbox vbYesNo ?

    Bonjour, Pourquoi dans mon code ci-dessous, quand je click "non", l'exit sub ne fonctionne pas et le code continue jusqu'a la fin ? Merci de vos commentaires Est ce que vbYesNo = no ne veux rien dire ? Private Sub CommandButtonSupprimer_Click() If OptionButton1 = True Then MsgBox...
  16. G

    Problème sur alimentation Combobox

    Bonjour, Je n'avais jamais remarqué que j'ai un bug au niveau de l'alimentation de mes combobox quand dans la liste il ya uniquement 1 ligne ! With Sheets("feuil10") ComboBoxOuv.List = .Range("B6:B" & .Range("B65536").End(xlUp).Row).Value End With Et pourquoi ? et je rajoute et...
  17. G

    Copier Ligne, la valeur et pas la formule

    Re : Copier Ligne, la valeur et pas la formule merci fred, j'ai modifié comme ceci : Private Sub CommandButton1_Click() Range("A4:D4").Copy 'ajuste nom de feuille et adresse de cellule Sheets("feuil2").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues End Sub...
  18. G

    Copier Ligne, la valeur et pas la formule

    Bonjour le forum, un petit exemple joint pour être plus clair, Je veux copier une ligne qui comporte dans ces cellules "=feuil!a1", mais je ne veux pas copier la formule mais la valeur trouvée ? Merci, Géraldine
  19. G

    Objets Visible ou Pas ?

    Re : Objets Visible ou Pas ? re, je vais faire des tests avant d'embeter tout le monde, j'ai crée des formes sous excel2003 et ça fonctionne et celle crée sous excel2007, apparemment ne fonctionne pas. merci pierrot @
  20. G

    Objets Visible ou Pas ?

    Re : Objets Visible ou Pas ? je tiens ma promesse pierrot, merci et merci mais j'applique à ActiveSheet.Shapes("Arrondirunrectangleavecunc_8").Visible = True et evidemment ça fonctionne pas .... pfffffff deux fois pfffffff et pffffffff @