Gestion Planning

Gestion Planning v2006-25.08b

  • Initiateur de la discussion Initiateur de la discussion VincentB74
  • Date de début Date de début

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 bonjour Vincent,
J'ai réussis a avoir la liste des tables manquantes, mais je ne les ai pas dans les fichiers indiqués.
Est ce que cela veux dire que je ne pourrais pas utiliser votre planning ?
Ou il y a une possibilité de les avoir ?
Je vous joint une capture écran
Bonne journée
 

Pièces jointes

  • Capture d'écran 2024-12-13 143641.png
    Capture d'écran 2024-12-13 143641.png
    172.8 KB · Affichages: 43
Re bonjour Vincent,
J'ai réussis a avoir la liste des tables manquantes, mais je ne les ai pas dans les fichiers indiqués.
Est ce que cela veux dire que je ne pourrais pas utiliser votre planning ?
Ou il y a une possibilité de les avoir ?
Je vous joint une capture écran
Bonne journée
Je suis absent cet après-midi de mon domicile mais je ne manquerai pas de vous envoyer le fichier manquant.
Envoyé moi un mail sur vincentb74(a)gmail(point)com
Bon après midi
Vincent

En attendant, il vous faut installer PDFCreator version 4.4.3 ou 4.4.4 qui sont gratuites et cela permettra d'activer PDF creator Com
 
Bonjour Vincent
j'ai une erreur sous Office 365 64 bits

sur l'instruction : FindWindowA

Sub OteCroix(UF As UserForm)
Dim hWnd As Long
'Enlève la croix rouge de l'UF
hWnd = FindWindowA("Thunder" & IIf(Application.Version Like "8*", "X", "D") _
& "Frame", UF.Caption)
SetWindowLongA hWnd, -16, GetWindowLongA(hWnd, -16) And &HFFF7FFFF
End Sub

merci
 
Bonjour
Pour résoudre mon souci d'erreur j'ai décoché Manquant Outlook que je n'utilise jamais.
Capture d'écran 2025-03-07 095113.png
 
Bonjour Vincent
j'ai une erreur sous Office 365 64 bits

sur l'instruction : FindWindowA

Sub OteCroix(UF As UserForm)
Dim hWnd As Long
'Enlève la croix rouge de l'UF
hWnd = FindWindowA("Thunder" & IIf(Application.Version Like "8*", "X", "D") _
& "Frame", UF.Caption)
SetWindowLongA hWnd, -16, GetWindowLongA(hWnd, -16) And &HFFF7FFFF
End Sub

merci
Bonjour,

Désolé du retard de ma réponse.
Il faudrait essayer ce code à mettre dans l'en-tête du module => mb_AppVbo

#If Win64 Then
Declare PtrSafe Function GetWindowLongA Lib "user32" (ByVal hWnd As LongPtr, ByVal nIndex As LongPtr) As LongPtr
Declare PtrSafe Function SetWindowLongA Lib "user32" (ByVal hWnd As LongPtr, ByVal nIndex As LongPtr, ByVal dwNewLong As LongPtr) As LongPtr
Declare PtrSafe Function FindWindowA Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPtr
#Else
Declare Function GetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Declare Function SetWindowLongA Lib "user32" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Declare Function FindWindowA Lib "user32" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
#End If

En espérant que cela corrige le problème.
Vincent
 
VincentB74 a mis à jour Gestion Planning avec une nouvelle entrée de mise à jour:

Gestion Planning

Regarde la pièce jointe 1221060

Modification du code et des variables.
Modification des écrans de lancement.

Amélioration des formules.
Retouches cosmétiques.

Correction d'erreurs dans le code.

***/***

J'espère avoir pensé à tout mais je reste à votre dispostion pour toutes questions.

***/***

Cette application nécessite EXCEL® 2010 ou supérieur 32 ou 64 bits.
Vous devez activer les macros au lancement du logiciel sinon, vous ne pourrez pas accéder aux...

Lire le reste de cette entrée de mise à jour...
 
- 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

Discussions similaires

Retour