XL 2010 Figer les volets

M

mic6259

XLDnaute Occasionnel
Bonjour a tous et bonne année 2021

Selon la pièce jointe, quand je mets la colonne T a côté du C(Volets figés a C2), dans Private Sub ChkB_Point_Click() puis Me.TextBox3.Value = Ws.Cells(Ligne, 3) pour afficher la ligne, et quand dans le formulaire je choisi le jour 25/3 puis Nom120 toute les colonnes reviennent a D. Quand je supprime Me.TextBox3.Value = Ws.Cells(Ligne, 3), çà marche mais je n'ai plus nom120 affiché. Serait-il possible de modifier dans le VBA de façon a ce que j'aperçois le nom et la colonne T au côté du C après chaque choix. La colonne T est un exemple, je vais changer cette colonne a chaque besoin.

Merci beaucoup
 

Pièces jointes

  • Pointage.xlsm
    54.7 KB · Affichages: 28
Solution
R
Bien sûr, if suffit d'ajouter 2 lignes en fin da macro "Private Sub CommandButton4_Click()"
Ce qui donne:

VB: 
Private Sub CommandButton4_Click()
     Dim Ligne As Long
     Dim AA As Long
    
     If Me.ComboBox1.ListIndex <> -1 Then
        If MsgBox("Confirmez-vous la modification de ce contact ?", vbYesNo, "Demande de confirmation de modification") = vbYes Then
            Ligne = Me.ComboBox1.ListIndex + 2
            For AA = 1 To 2
               If Me.Controls("TextBox" & AA).Visible = True Then
                   Ws.Cells(Ligne, AA) = Me.Controls("TextBox" & AA)
               End If
            Next AA
        End If
     End If
    Col = CmB_Jour.ListIndex + 3
    ActiveWindow.ScrollColumn = Col
End Sub
Trier par date Trier par votes

Discussions similaires

S
  • Résolu(e)
XL 2016 problème de filtre dans listbox
2 3 4
Réponses
51
Affichages
1 K
saidoush
S
S
  • Question
Microsoft 365 créer un macro vba
Réponses
0
Affichages
163
souhaib ad
S
S
  • Question
XL 2021 macro VBA excel
Réponses
1
Affichages
185
crocrocro
C
3xceln4ute
  • Question
Microsoft 365 VBA export Excel vers Word : Bnq congé 0
Réponses
5
Affichages
339
Phil69970
Phil69970
E
  • Résolu(e)
Microsoft 365 Problème d'organisation des colonnes dans une ListBox en VBA Excel
Réponses
2
Affichages
525
eCHO
E
X
  • Résolu(e)
XL 2016 Problème lors de recherche croisée.
Réponses
4
Affichages
271
Xender
X
D
  • Résolu(e)
XL 2016 VAB : Masquer les lignes si la cellule en J contient "clôturée"
Réponses
3
Affichages
301
daviddemetz72
D
C
  • Résolu(e)
XL 2021 Aide pour affichage colonne listbox après une recherche par textbox
Réponses
10
Affichages
287
Claudinedu13
C
R
  • Résolu(e)
XL 2019 Convertir date en mois et année par macro
Réponses
5
Affichages
233
Rabeto
R
M
  • Résolu(e)
Microsoft 365 Erreur code ou pas ?
2
Réponses
17
Affichages
372
Marvin57
M

Membres actuellement en ligne

2 membres et 69 invités.

Partager cette page

Tutos vidéos

Power Query : Ajouter des requêtes (Excel et Power BI)
Créez votre première fonction LAMBDA dans Excel en 3 étapes!
LAMBDA, l’arme secrète de Microsoft pour Excel !
Office Insider - Découvrez les nouveautés Excel avant tout le monde

Statistiques des forums

Discussions
312 370
Messages
2 087 693
Membres
103 641
dernier inscrit
anouarkecita2