controls d'une frame et fractionnement fenêtre

[Blafi]

Bonjour à tous et bon dimanche,

J'ai 2 questions à vous poser :

1/ En VBA et dans un userform, existe-t-il une commande pour faire référence à une frame et à l'ensemble des controles qu'elle contient (il s'agit pour moi de la rendre "Enabled" avec tous ses controles et j'ai essayé "Frame1.controls.enabled=False" mais ça ne marche pas..il semblerait qu'il faille faire une boucle qui rendra Enabled chacun des controles.. Est-ce vrai ?)

2/ toujours en VBA, j'ai une feuille excel que j'ai fractionnée en 2 verticalement. Etant dans une cellule de la fenêtre droite, je voudrais, par une commande VBA dans mon code, revenir à la première cellule sur la gauche et sur la même ligne. Si j'essaye "Activecell.End(xlToLeft).Select ", je reviens à la première cellule au bord de la fenêtre de droite mais pas à la première cellule de la ligne... Comment faire?

Merci d'avance de ce que vous pourrez faire pour m'aider

 

[Pierrot93]

Re : controls d'une frame et fractionnement fenêtre

Bonjour Blafi

pour ta 1ère question, essaye comme ci dessous :

Dim x As Control
For Each x In Frame1.Controls
    x.Enabled = False
Next x

bonne journée
@+

 

[Pierrot93]

Re : controls d'une frame et fractionnement fenêtre

Re

pour ta 2ème question, si j'ai bien compris, essaye comme ci dessous, code fait avec l'enregistreur.

ActiveWindow.Panes(1).Activate
    Range("B4").Select

@+

 

[Spitnolan08]

Re : controls d'une frame et fractionnement fenêtre

Bonjour,
Re Pierrot,

En complément :

Sub test()
Cel = ActiveCell.Address
    ActiveWindow.Panes(1).Activate
    Range(Cel).End(xlToLeft).Select
End Sub

Cordialement

 

[Blafi]

Re : controls d'une frame et fractionnement fenêtre

Merci à Spitnolan08 et Pierrot93 pour vos réponses rapides et vos codes....
Je vais essayer tout cela..
A ++