Comment basculer d'une feuille a une autre en selectionnant des cellules

Bonjour poussin

Tu penses qu'on va deviner comment est constitué ton fichier ?
Poste un exemple de ton fichier sur mon-partage.fr, fais créer un lien que tu copies et reviens coller ici

Cdlmnt
Via

C'est bon j'ai le fichier mais les tableaux sont vides
Fournis moi au moins un exemple
Qu'est qui s’inscrit dans les cellules de planning lors d'une réservation ? quel est le lien avec la fiche client ?

Bon j'ai travaillé sur une macro pour remplir en une seule fois fiche client et planning
Il me reste pour relier aux autres feuilles à pouvoir y accéder donc il me faut le mot de passe pour les déprotéger

Voilà

Sur la feuille Planning le bouton Enregistrer ouvre le formulaire à remplir, ceci fait la fiche client est complétée et le n° du client mis sur la ligne de la chambre aux bonnes dates dans Planning qu'une MFC colore en vert

Pour éditer la feuille facture il suffit d'indiquer le n° client à côté en haut à droite, les formules font le reste pour remplir la facture
La feuille Envelope est liée par formule à la feuille facture et comporte donc les indications correspondantes, là encore la chambre se colore sur le plan par MFC

Mais par pitié, bannissez ces p.... de cellules fusionnées qui ne servent à rien , on obtient la même chose en agrandissant la taille des lignes ou des colonnes, mais qui sont une plaie pour els formules et les macros !

https://mon-partage.fr/f/mi7FDUut/

A toi de me dire si tout convient ou s'il y a lieu d'apporter des modifs ou améliorations

Bonjour

C'est que tu n'as pas le contrôle Calendrier
Essaie de faire ALT+F11 pour ouvrir l'éditeur
Outils
Contrôles supplémentaires
et choisir le Calendrier dans la liste

Si ça ne fonctionne pas voilà une version sans calendrier
https://mon-partage.fr/f/x6rsIoNp/

Cdlmnt
Via

Je ne comprend pas ça fonctionne bien chez moi
Tu as ouvert le 2eme fichier que je t'ai envoyé ?
Sinon renvoie moi le fichier au lieu d'une image

Je ne sais pas il fonctionne parfaitement chez moi !!!

Re,

Essaie cette version
https://mon-partage.fr/f/bsqf8FNb/

Non j'ai modifié la macro
Essaie d'enregistrer une réservation

Me suis trompé de fichier, voilà le bon
https://mon-partage.fr/f/7dy5nB3U/

Essaie avec ce fichier ci
https://mon-partage.fr/f/6kprCCsI/

Private Sub CommandButton1_Click()
Dim Ligne As Long, ligne2 As Long
With Sheets("FICHE CLIENT")
Ligne = .Columns(1).Find("*", , , , xlByColumns, xlPrevious).Row + 1
.Range("A" & Ligne) = .Range("A" & Ligne - 1) + 1
If Me.O1 = True Then .Range("B" & Ligne) = "Client" Else .Range("B" & Ligne) = "Société"
If Me.O3 = True Then .Range("E" & Ligne) = "Civil" Else .Range("E" & Ligne) = "Militaire"
.Range("C" & Ligne) = Me.nom
.Range("D" & Ligne) = Me.prenom
.Range("F" & Ligne) = Me.grade
.Range("G" & Ligne) = Val(Me.nombre)
.Range("H" & Ligne) = Me.chambre
.Range("I" & Ligne) = CDate(Me.jA & "/" & Me.mA & "/" & Me.aA)
.Range("J" & Ligne) = CDate(Me.jD & "/" & Me.mD & "/" & Me.aD)
.Range("K" & Ligne) = Me.tel
.Range("L" & Ligne) = Me.paiement
.Range("M" & Ligne) = Me.sejour
If Me.petit = True Then .Range("N" & Ligne) = "OUI" Else .Range("N" & Ligne) = "NON"
If Me.dej = True Then .Range("O" & Ligne) = "OUI" Else .Range("O" & Ligne) = "NON"
.Range("P" & Ligne) = Me.reserv
.Range("Q" & Ligne) = Me.autres
ligne2 = Val(.Range("H" & Ligne)) + 7
For n = .Range("I" & Ligne) To .Range("J" & Ligne)
col = n - CDate("1/1/" & Year(n)) + 4
Sheets("PLANNING").Cells(ligne2, col) = .Range("A" & Ligne)
Next
End With
Unload Me
End Sub

For n = .Range("I" & Ligne) To .Range("J" & Ligne)

A cette ligne le "n" est colorier en bleu sur la macro et du coup ça beugue.

?????
renvoie moi le fichier en me disant exactement ce que tu as entré comme données dans le formulaire en dates car appartement c’est là que ça coince

Non tout est correct si tu ne rentres que des nombres pour les dates et pour la chambre
Fonctionnement impeccable chez moi

Je ne comprends pas
Et pas moyen de savoir puisque je n'arrive pas à reproduire le bug chez moi !
Essaie cette nouvelle version
https://mon-partage.fr/f/W5exf0zk/