201 résultats trouvés

par IronBoule
26 décembre 2018, 14:47
Forum : Excel - VBA
Sujet : Changer le nom d'onglets d'un classeur avec la valeur d'une cellule
Réponses : 4
Vues : 90

Re: Changer le nom d'onglets d'un classeur avec la valeur d'une cellule

Bonjour Doui0101,

A essayer :
Sub changerNomOnglet()
    Dim Sh As Worksheet
    For Each Sh In Worksheets
        On Error Resume Next
        Sh.Activate
        Sh.Name = "Fiche individuelle " & Range("C9") & " " & Range("E9")
    Next Sh
End Sub
Cordialement,
par IronBoule
16 novembre 2018, 15:00
Forum : Excel - VBA
Sujet : La méthode 'Range' a échoué
Réponses : 4
Vues : 73

Re: La méthode 'Range' a échoué

Bonjour pagesalex,

Modifie par
a = ma_selection.Cells(1, 1).Row
En faisant comme cela, je n'ai plus l'erreur.

Cordialement,
par IronBoule
16 novembre 2018, 11:58
Forum : Excel - VBA
Sujet : Userform inséré ligne + copie donné.
Réponses : 4
Vues : 86

Re: Userform inséré ligne + copie donné.

Bonjour yamitony, Dans ton code, il manque l'insertion de ligne, c'est pour cela que tes données sont effacées après la validation de l'USF. Il faut que tu rajoute ce code avant l'insertion des nouvelles valeurs : lig = Range("A" & Rows.Count).End(xlUp).Row Range("A" & lig).EntireRow.Insert Shift:=x...
par IronBoule
16 novembre 2018, 10:38
Forum : Excel - VBA
Sujet : exécution macro temporisé à l'ouverture
Réponses : 5
Vues : 114

Re: exécution macro temporisé à l'ouverture

Bonjour pinpin,

Essaye avec
Application.Wait Now + TimeValue("0:01:00")
En début de macro

Avec
Private Sub Workbook_Open()
Cordialement,
par IronBoule
15 novembre 2018, 16:48
Forum : Excel - VBA
Sujet : Affecter la bonne macro dans le bouton d'un nouveau document
Réponses : 4
Vues : 138

Re: Affecter la bonne macro dans le bouton d'un nouveau document

Bonjour Erlendur,

En ajoutant dans le code :
ActiveSheet.Shapes.Range(Array("Button 1")).Select 'Modifier le nom de la feuille et du bouton
Selection.OnAction = "Test" 'A modifier par le nom de la macro ou "'Nom du fichier.xlsm'!Test"
Cordialement,
par IronBoule
13 novembre 2018, 15:00
Forum : Excel - VBA
Sujet : Retroplanning
Réponses : 4
Vues : 86

Re: Retroplanning

Bonjour le forum,

A essayer :
=SI(A3<=7;52-(7-A3);A3-7)
Cordialement,
par IronBoule
13 novembre 2018, 13:55
Forum : Excel - VBA
Sujet : Afficher différentes colonnes suivant valeur d'une cellule
Réponses : 2
Vues : 83

Re: Afficher différentes colonnes suivant valeur d'une cellule

Bonjour Remi,

A tester :
Masquer colonnes selon A1.xlsm
(13.25 Kio) Téléchargé 9 fois
Cordialement,
par IronBoule
13 novembre 2018, 09:41
Forum : Excel - VBA
Sujet : Clic sur cellules affiche contenu d'une autre cellules
Réponses : 2
Vues : 99

Re: Clic sur cellules affiche contenu d'une autre cellules

Bonjour pagesalex, Si j'ai bien compris ta demande, en faisant un double clic dans une cellule, les commentaires associés seront alors affichés dans l'USF2. Pour l'instant, cela fonctionne sur la feuille 19112018 et c'est juste de l'affichage. Pour voir au moins, si j'ai bien cerné ta requête. Copie...
par IronBoule
12 novembre 2018, 14:54
Forum : Excel - VBA
Sujet : Choisir et copier en valeur chaque colonne qui a la date = Sheets("Etat Loc
Réponses : 2
Vues : 52

Re: Choisir et copier en valeur chaque colonne qui a la date = Sheets("Etat Loc

Bonjour Alinkaa,

Enlève le
Exit For
qui empêche le code de vérifier les autres colonnes de la ligne 7.

Cordialement,
par IronBoule
12 novembre 2018, 14:41
Forum : Excel - VBA
Sujet : Ouvrir feuille en fonction de la date du jour
Réponses : 8
Vues : 137

Re: Ouvrir feuille en fonction de la date du jour

A tester : Planning - Gestion Heures RDV.xlsm L'USF s'ouvre en cliquant sur le bouton TEST de la feuille Liste TP. Il prend en compte les horaires où il n'y a pas de RDV pour chaques feuilles (grâce à la colonne M qui est masquée). Le code fonctionne pour le 1 de chaques feuilles. Pour le faire fonc...