Classeurs Exemples à télécharger

• Visionneuse(visioxl2.xls)

A placer dans un répertoire contenant des images permet de les visionner et de les coller dans la feuille
• Visionneuse(visioxl3.xls)

Propose de choisir un répertoire contenant des images de les visionner et de les coller dans la feuille
• Absences congés Planning visuel
• génerer tableaux (Bug 97)

exemples de macros destinées à dupliquer une feuille contenant un tableau.
sur les mois
sur les semaines Attention le semainier annuel sous la version Excel97 met en évidence un bug , s'arrête à la moitié des feuilles, la dernière ainsi nommée en Codename Feuil1111111111111111111111111(Feuil25)-
Voici comment (voir plancongé) on peut y palier:

'....
Dim i as integer, ws as Worksheet
'...


On Error Resume Next
i = 0
For Each ws In ActiveWorkbook.Worksheets
i = i + 1
ws.Parent.VBProject.VBComponents(ws.CodeName) _
.Properties("_CodeName") = "Feuil" & i
On Error GoTo 0
Next ws
'------------------------------ mais attention sous versions récentes cela implique d'adapter le niveau de sécurité et "faire confiance au projet".