Bonjour à tous,
Voir document en pièce jointe pour mieux comprendre.
J'ai un tableau avec une date d'entrée (check-in) et une date de sortie (check-ou), et à côté j'ai des colonnes avec les dates (une date par colonne). Je n'arrive pas à trouver la bonne formule me permettant de mettre "1" dans les colonnes de dates comprises entre le check-in et le check-out...
J'ai utilisé =SI(ET(Date_Colonne>=Date Check-in;Date_Colonne<=Date_Check-out;1;0) mais aucun succès.
Auriez-vous une réponse ?
Merci par avance !
D'autre part, j'ai un autre problème sur mon fichier (RIEN à voir avec mon problème de formule) :
J'ai ajouté 2 programmations VBA sur mon fichier dont voici les fonctions :
1) Passage vertical d'une partie à une autre via le clic
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row < 29 Then
If Rows(2).Hidden = True Then Rows("2:26").EntireRow.Hidden = False
Else
If Rows(2).Hidden = False Then Rows("2:26").EntireRow.Hidden = True
End If
End Sub
2) Mise en valeur de la dernière date d'enregistrement du fichier
'----------------------------------
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("PGS21").Range("X1") = Format(Now(), "mm/dd/yy H:MM:SS")
End Sub
'----------------------------------
OR je souhaiterais protéger mon fichier et laisser des cellules libres mais ça ne fonctionne pas avec ces 2 programmes.
Peut-on faire quelque chose ou bien cela n'est pas compatible ?
Merci
Bonne journée,
BERTY