excel ; besoin d'aide pour effectuer une macro Résolu/Fermé

Question

bonjour tout le monde

j'ai besoin d'aide pour finaliser mon tableau avec un calendrier automatique dedans. l'idée est avec la macro de pouvoir faire en sorte que les colonnes de fin de mois se suppriment automatique. Mon tableau est basé sur 31 jours par mois mais selon les mois, certains sont à 29 et d'autres à 30. J'aimerais donc que la macro serve a supprimer automatiquement ces colonnes supplémentaires sur les mois concernés. J'ai effectué ce tableau à l'aide d'un tuto vidéo sur youtube mais impossible de comprendre la macro. Vraiment beaucoup trop complexe. j'ai pourtant tout essayer pendant 5h hier mais en vain. merci pour votre aide

M-12 · Answer

Bonjour,

Un p’tit classeur anonymisé serait mieux pour régler le soucis 

Allez dans https://www.cjoint.com/
Cliquez sur "PARCOURIR" pour sélectionner le classeur
Clic le bouton "CREER LE LIEN"
Clic droit quand le lien est créé "COPIER LE LIEN"
Sur le post Clic droit "Coller".

laerouss · Answer

Ci joint mon tableau

 https://www.cjoint.com/c/LAAiyHrHZaK

le code de la macro conseillé dans la vidéo est ici, mais impossible de le comprendre et de modifier selon mon tableau
Sub Masquer_Jour()
Dim Num_Col As Long
   For Num_Col = 30 To 32     ' Boucle sur les cellules des jours 29, 30 et 31
      If Month(Cells(6, Num_Col)) >= Cells(1, 1) Then
         Columns(Num_Col).Hidden = True
      Else
         Columns(Num_Col).Hidden = False
     End If
   Next 
   Range("B6:AF13").ClearContents  'Supprime le contenu dans les cellules
End Sub

M-12 · Answer

Re,
A tester avec la macro modifiée
le fait de changer le mois ou l'année la ou les colonnes concernées se masquent ou s'affichent
https://www.cjoint.com/c/LAAjlhqsXzv

M-12 · Answer

Re,
Sans savoir au départ, et avec une macro lachée sans correspondance avec le fichier, faut être un devin

dans le Module 1 (macro)
supprimer cette ligne sur les deux macros
 Range("C7:G42").ClearContents 'Supprime le contenu dans les cellules

Excel ; besoin d'aide pour effectuer une macro

4 réponses

Newsletters