Résultats de la recherche

  1. DonBeuBeu

    [Excel 2007] VBA - Tri alphabétique lorsque l'on quitte l'onglet

    Bonjour, J'ai fait une petite macro pour trier deux colonnes par ordre alphabétique quand je quitte l'onglet, sa donne sa: Private Sub Worksheet_Deactivate() Range("B2:B" & Rows.End(xlDown).Row).Select Range("A2:A" & Rows.End(xlDown).Row).Sort Range("A1"), xlAscending '.Sort...
  2. DonBeuBeu

    Fonction ExportAsFixedFormat

    Re : Fonction ExportAsFixedFormat Bonjour, Merci pour ta réponse, sa me génère bien le pdf mais pas les photos qui sont censé être dessus...
  3. DonBeuBeu

    Fonction ExportAsFixedFormat

    Bonjour, Je souhaite "imprimer" en pdf des onglets sur mon fichier, via la fonction ExportAsFixedFormat Il me met un message d'erreur dès le début: Erreur de compilation Membre de méthodes ou de données introuvable Je ne comprend pas l'erreur, voici le code Sub g() If...
  4. DonBeuBeu

    [RESOLU] Image et Userform

    Re : Image et Userform Merci Hervé, je vais essayer avec ce que tu m'a donné ;-)
  5. DonBeuBeu

    [RESOLU] Image et Userform

    Bonjour, Dans ma macro je voudrais à un moment que l'utilisateur puisse décider d'insérer ou non des photos qui sont dans un dossier. Le dossier change tout le temps (mais la n'est pas le problème) et les photos aussi Du coup il me faudrait une macro capable de me sortir les noms des...
  6. DonBeuBeu

    [Résolu] [VBA] Insérer une scrollbar pour faire varier une heure

    Re : [VBA] Insérer une scrollbar pour faire varier une heure Bonjour phlaurent Merci, sa marche à merveille ;) @+
  7. DonBeuBeu

    [Résolu] [VBA] Insérer une scrollbar pour faire varier une heure

    Bonjour le forum! J'ai un fichier qui calcul le temps de travail par semaine, rien de plus simple... J'ai insérer une bouton pour "remettre à zéro" les heures d'arrivées, or je voudrais pouvoir sélectionner mon heure d'arriver via une scrollbar dans un userform... Je sais pas si c'est...
  8. DonBeuBeu

    [VBA] Problème de bouton qui disparaît???

    Re : [VBA] Problème de bouton qui disparaît??? @xhudi: Il supprime quand même le bouton si je le sort de la zone d'impression @phlaurent: Pas de procédure BeforePrint Je tient à préciser aussi que sa marchais parfaitement sous Excel 2007, et c'est depuis que je suis en Excel 2013 que sa foire...
  9. DonBeuBeu

    [VBA] Problème de bouton qui disparaît???

    Re : [VBA] Problème de bouton qui disparaît??? Tout mon code est là, et pour les autres fichiers c'est le même code... Y'a rien qui demande d'effacer des lignes ou n'importe quoi d'autre c'est sa que je comprend pas...
  10. DonBeuBeu

    [VBA] Problème de bouton qui disparaît???

    Re : [VBA] Problème de bouton qui disparaît??? Ce genre de code: Sub impression_graphes() If MsgBox("Etes-vous certain de vouloir imprimer les graphes?", vbYesNo, "Demande de confirmation") = vbYes Then ActiveSheet.PageSetup.PrintArea = "$B$2:$T$70" With ActiveSheet.PageSetup...
  11. DonBeuBeu

    [VBA] Problème de bouton qui disparaît???

    Bonjour à tous! J'ai un petit souci sur plein de fichier excel sur lesquels j'ai des macro d'impressions, quand je clique sur le bouton, la macro marche mais sauf qu'a la fin le bouton disparaît :eek: Ps: Je suis sur Excel 2013 ;) Merci d'avance!!!
  12. DonBeuBeu

    [Résolu] [VBA] Activer/désactiver une macro à l'aide d'un "switch"

    Re : [VBA] Activer/désactiver une macro à l'aide d'un "switch" Sa marche! Impeccable merci à toi ;) Bonne après midi!
  13. DonBeuBeu

    [Résolu] [VBA] Activer/désactiver une macro à l'aide d'un "switch"

    Bonjour tout l'monde!!! Petite question, j'ai une macro dans un de mes fichiers excel: Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim cible As Range Set cible = Range("D4:M41") If Not Intersect(Target, cible) Is Nothing Then If Target.Value = "" Then...
  14. DonBeuBeu

    [Résolu] [VBA] Effacer les points dans une sélection

    Re : [VBA] Effacer les points dans une sélection Bonjour Pierrot, et merci pour ta réponse ;) En faites assez bizarrement sa marche de cette façon Columns(3).TextToColumns Destination:=Range("C1"), DecimalSeparator:=",", ThousandsSeparator:="." Columns(3).TextToColumns...
  15. DonBeuBeu

    [Résolu] [VBA] Effacer les points dans une sélection

    Hello! Petit souci, j'ai une liste de valeurs au formats américains, en gros le séparateurs de milliers est représenté par un point. Se qui fait que lorsque j'exporte cette liste de valeurs le point n'est pas considéré comme un séparateurs de milliers =\ Du coup j'ai tapé un petite macro...
  16. DonBeuBeu

    [Résolu] Extraire la valeur minimale après une fonction INDEX/EQUIV

    Re : Extraire la valeur minimale après une fonction INDEX/EQUIV C'est bon j'ai trouvé mon bonheur!!! la formule à R@chid marche très bien ;) Merci beaucoup à tous et bonne journée!
  17. DonBeuBeu

    [Résolu] Extraire la valeur minimale après une fonction INDEX/EQUIV

    Re : Extraire la valeur minimale après une fonction INDEX/EQUIV Merci pour vos réponses! @phlaurent55: Très bonne solutions mais un TCD sera un peu dur à caser dans ma situation @R@chid: Pas bête mais la plage de cellule est variable je ne pense pas qu'une fonction DECALER marche parfaitement...
  18. DonBeuBeu

    [Résolu] Extraire la valeur minimale après une fonction INDEX/EQUIV

    Bonjour! Voilà dans un de mes classeurs excel j'ai une fonction INDEX/EQUIV, qui me permet de retrouver une valeur, sauf qu'en faites le résultat se porte sur plusieurs valeurs. je sais que par défaut la fonctions va prendre la première valeur qu'elle va trouver, je voudrais qu'elle me...
  19. DonBeuBeu

    [Résolu] [VBA] Erreur 91

    Re : [VBA] Erreur 91 Impeccable merci bien ;) Bonne journée!
  20. DonBeuBeu

    [Résolu] [VBA] Erreur 91

    Salut tout l'monde! Voilà un petit souci avec mon code, au début j'ai un userform qui me permet de choisir entre plusieurs machines (qui va servir sur le dernier paragraphe du code) Private Sub OK_Click() 'Introduction Application.StatusBar = "En cours d'optimisation"...