Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Afficher date du jour et n° de semaine dans USF et sur feuille excel
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Re : Afficher date du jour et n° de semaine dans USF et sur feuille excel
Bonjour Kohta
regarde le code ci dessous, renvoie lors de l'initialisation de l'USF, dans un textbox nommé "textbox1" la date du jour ainsi que le numéro de semaine :
Code:
Private Sub UserForm_Initialize()
TextBox1.Value = "Date : " & Date & " semaine n° " & DatePart("ww", Date, 2, 2)
End Sub
Re : Afficher date du jour et n° de semaine dans USF et sur feuille excel
Super. J'étais justement a la recherche d'un petit bout de code pour mettre automatiquement le numéros de la semaine avant d'imprimer. .. Je passe mon tit bout de code des fois que ca aide qqun
Sheets("Donnée").Range("B3") = DatePart("ww", Date, 2, 2)
reponse = MsgBox(" Voulez vous imprimer vos documents?", vbYesNo, "QUESTION")
If reponse = vbYes Then
ThisWorkbook.PrintOut from:=2, To:=19, Copies:=1, Collate:=True
End If
If reponse = vbNo Then
End
End If
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD