selection d'une plage avec des cellules separées

[Arapao]

Bonjour,
je cherche une solution sur VBA
j'ai deux variable, la première dans une combobox et la deuxieme dans un sélecteur de date, les deux situé dans une userform.
Comment puis je sélectionner une cellule dans un tableau avec ce deux variables en sachant que la valeur de la combobox est la sélection d'une ligne et la date la sélection d'une colonne?

Et deuxième chose quand je choisi une date dans la même uerform comment sélectionner la colonne correspondante en ne sélectionnant pas toute la colonne mais uniquement quelques cellules séparées sur cette colonne?

en espérant avoir été assez clair.
Dans l'attente de vos réponse
merci et bonne journée

 

[WUTED]

Re : selection d'une plage avec des cellules separées

Bonjour Arapao et bienvenue sur XLD,

Il serait préférable que tu mettes ton fichier en pièce jointe, en attendant je doute que ce soit la solution que tu cherches mais :

Range("A1:A10")

Correspond aux cellules entre la cellule A1 et la cellule A10.

 

[Arapao]

Re : selection d'une plage avec des cellules separées

Bonjour et merci.
je mettrais mon fichier ce soir car je suis au boulot.
Merci Wuted

 

[Arapao]

Re : selection d'une plage avec des cellules separées

Bonsoir, voici le fichier.

Premier problème:

en cliquant sur le bouton pointage, ensuite équipe complète

je choisis une date ce qui me sélectionne une plage correspondant à la date.
Ce que je souhaiterais c'est que dans ma sélection les cellules qui correspondent à des lignes vides ne soient pas sélectionnées.

ex: je sélectionne la date du 16 mai, actuellement il sélectionne les cellules de AE9 à AE40.
je souhaiterais qu'il me sélectionne la même plage sans les cellules AE12, AE17,AE29 et AE38


Deuxième problème:

en cliquant sur le bouton pointage, ensuite une personne

je choisis un nom dans la combobox et une date.
comment sélectionner la cellule corespondant a cette sélection

ex: personne A pour la date du 16 mai, il me sélectionne la cellule AE9.

D'avance merci

 

[Arapao]

Re : selection d'une plage avec des cellules separées

Mon problème serit il si compliqué a régler?
Personne n'a même une petite piste pour m'éclairer?

Bonne soirée

 

[Robert]

Re : selection d'une plage avec des cellules separées

Bonsoir Arapao, bonsoir le forum,

Essaie comme ça :

Private Sub DTPicker2_Change()
Dim pl As Range 'déclare la varialbe pl (PLage)
Dim col As Integer 'déclare la varialbe col (COLonne)

' recherche de la dateb = DTPicker2.Value
Range("p7").Select
5 If ActiveCell.Value = b Then GoTo 20 Else GoTo 10
10
ActiveCell.Offset(0, 1).Activate
GoTo 5
20
ActiveCell.Offset(2, 0).Select
col = ActiveCell.Column 'définit la colonne col
Set pl = Selection.Resize(3, 1) 'définit la plage pl
Set pl = Application.Union(pl, Range(Cells(13, col), Cells(16, col)), Range(Cells(18, col), Cells(28, col)), _
    Range(Cells(30, col), Cells(37, col)), Range(Cells(39, col), Cells(40, col))) 'redéfinit la plage pl
pl.Select 'sélectionne la plage pl
End Sub