Résultats de la recherche

  1. B

    Checkbox et cochage

    Bonjour, Dans mon userform j'ai trois checkbox, je voudrais qu'il n'y en ait qu'une checkbox coché à la fois (le cochage d'une nouvelle checkbox est donc soit impossible soit décoche automatiquement l'autre) Comment et où codé cela ? Davance merci
  2. B

    AddItem en double...

    Bonjour, Suis-je obligé d'écrire ça ou bien y a t'il une solution plus courte... With ComboBoxVar1 .AddItem 'Adresse' .AddItem 'Facture du' .AddItem 'Début' .AddItem 'Fin' .AddItem 'Mois' .AddItem 'Année' .AddItem 'Référence' .AddItem 'Consommation HP' .AddItem 'Consommation HC'...
  3. B

    Tableau croisé et VBA

    Bonjour, J'ai crée une macro VBA afin de créer un tableau croisé dynamique. J'utilise l'instruction suivante: ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=''FeuilleOrigine'!R' & lignedeb & 'C' & coldeb & ':R' & lignefin & 'C' & colfin).CreatePivotTable...
  4. B

    VBA & TCD

    Bonjour, Avec une macro VBa je voudrais créer un tableau croisé dynamique. ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=''FeuilleOrigine'!R' & lignedeb & 'C' & coldeb & ':R' & lignefin & 'C' & colfin).CreatePivotTable TableDestination:=FeuilleDestination...
  5. B

    Combobox et feuilles

    Bonjour à tous, J'ai une useform avec une combobox et je voudrais y afficher la liste des feuilles existantes du classeur. J'ai tenté (en vain) ça : Sub UserFormTCD_Initialize() For i = 1 To Worksheets.Count ComboBoxTypeNRJ.AddItem Sheets(i).Name Next i
  6. B

    Format de mois

    Bonjour, J'ai des mois de 1 à 12 (normal!) et je les voudrais de janvier à décembre. J'utilise dans ma macro VBA l'instruction suivante : Columns('D:D').NumberFormat = 'mmmm' Mais du coup mon chiffre de 1 à 12 est interprété comme une date et pas juste un mois, comment y remédier ?
  7. B

    VBA pô compris

    Bonjour, Je suis tombé sur un problème là je ne comprends pas... Lorsque je lance une macro, excel m'affiche le message d'erreur suivant : Erreur d'exécution '1004': La méthode 'Range' de l'objet '_Global' a échoué et surligne en jaune ...
  8. B

    Cacher une cellule

    Bonjour, Je sais cacher une colonne : Columns('B:B').EntireColumn.Hidden = True Mais pas une cellule ! Quelle est la syntaxe, où le truc que je fais mal ?
  9. B

    Virus ? Pop-up aggressif ?

    Depuis quelque temps (vendredi dernier) j'ai régulièrement des programmes qui s'installent tous seuls (notamment un setup.exe dans DocumentandSetting) ou des pop-up qui ne se ferment pas. Comment les bloquer ? Existe-t'il un parefeu libre ou opensource ?
  10. B

    bug de date

    Je compare des dates avec un > tout bête et je renvoi un msgbox si la date de fin est inférieur à la date de début. La fonction marche bien sauf dans le cas où le jour de fin est inférieur au jour de début, ainsi la msgbox apparaît pour début:12 janvier 200 et fin:1 avril 2002 !
  11. B

    Gestion de date

    Bonjour, J'ai un petit problème de gestion de date. J'ai une userform avec trois combobox qui contiennent le jour, le mois et l'année. Pour obtenir une date j'ai concaténer et formater ainsi : DateFin = UserForm.ComboBoxConsoJourFin.Value & '/' & UserForm.ComboBoxConsoMoisFin.Value & '/'...
  12. B

    Fixé la largeur de plusieurs colonnes

    Bonjour, Je ne peux pas utiliser ? Columns('F:F,H:H').ColumnWidth = 13
  13. B

    Programme qui programme ?

    Bonjour, Peut-on écrire dans le module un programme qui 'colle' du code et crée un nouveau programme ? Je m'explique, j'ai une macro qui crée une feuille et un bouton dans cette feuille. Dans le module, j'ai le programme ('purge') de ce bouton. Il faudrait dans la feuille nouvellement crée...
  14. B

    XlBordersIndex

    Bonjour, Pour la mise en forme des bordures ils existent ces constantes : xlDiagonalDown xlDiagonalUp xlEdgeBottom xlEdgeLeft xlEdgeRight xlEdgeTop xlInsideHorizontal xlInsideVertical à quoi correspondent-elles exactement ? Merci
  15. B

    création de bouton

    Bonjour, J'ai une macro qui crée une feuille, dans cette nouvelle feuille je crée un bouton qui appelle une userform avec l'instruction suivante : ActiveSheet.OLEObjects.Add(ClassType:='Forms.CommandButton.1', Link:=False, Left:=11, Top:=3, Width:=38, Height:=24).Select Comment...
  16. B

    Tester si une feuille existe

    Bonjour, Avant de créer une feuille, j'aimerais savoir si la feuille existe déjà. Comment puis-je faire ? belette
  17. B

    ComboBox et date

    Bonjour, Dans une userform j'ai trois ComboBox pour le jour, le mois et l'année. Pour l'instant j'ai rempli avec addItem de 0 à 31, de janvier à décembre et de 1990 à 2100. Il n'y aurait pas moyen de faire plus simple, plsu élégant et plus court ?
  18. B

    Nombre et texte

    Bonjour, Existe une instruction en VBA pour vérifier qu'un nombre est bien un nombre et pas un text (string) ?
  19. B

    Appel d'une procédure

    Bonjour J'ai une procédure Sub purge() qui nettoye la feuille dans lequelle se trouve le bouton purge. J'ai donc un bouton 'purge' par feuille et des sub correspondant avec sub purge_click(), mais l'appel de la procédure ne fonctionne pas (message d'erreur Sub ou function non définie !)
  20. B

    Comment caché une ComboBox en fonction d'une autre

    Bonjour, Tout est dans le titre mais je précise : J'ai une combobox 'Type d'énergie' avec comme dernier Item 'Autre', j'aimerais que lroque 'Autre' soit sélectionner une autre combobox deviennent visible mais qu'elle reste caché pour les autres types d'énergie. merci