Vba definir la liste d'une combobox à partir de sources differentes

Bonjour à tous

Je souhaiterais alimenter une combobox à partir de 2 sources differentes
la premiere vient d'un tableau a nombre de lignes variabes et la deuxième provient d'une autre feuille avec un nombre de ligne fixes
Pour les gérer indépendamment pas de problème, mais pour mettre les 2 listes à la suite dans la meme combobox, je bloque :

J'ai essayé ceci, mais forcement ca ne fonctionne pas :

Code:

---

1 2	ComboBox4.List = Sheets("feuill1").Range("B29:B" & 29 + nbtache).Value And Sheets("feuill2").Range("G14:G15").Value 'nbtache etant ma variable

---

merci de votre aide


Une autre question pdt que je suis la, connaissez vous une FAQ qui permettrait de m'aider à verrouiller/deverouiller les cellules automatiquement par le biais de la maccros

Yann

Bonjour,

Une idée parmi d'autres, en passant par un tableau :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

Private Sub UserForm_Initialize()   Dim Tbl() Dim I As Integer Dim Nbtache As Integer   Nbtache = 20   ReDim Tbl(1 To Nbtache + 2)   For I = 1 To Nbtache   Tbl(I) = Sheets("feuill1").Range("B" & 28 + I)   Next I   Tbl(Nbtache + 1) = Sheets("feuill2").Range("G14") Tbl(Nbtache + 2) = Sheets("feuill2").Range("G15")   ComboBox4.List = Tbl   End Sub

---

Citation:

---

Une autre question pdt que je suis la, connaissez vous une FAQ qui permettrait de m'aider à verrouiller/deverouiller les cellules automatiquement par le biais de la macros

---

Code:

---

1 2	Range("A1").Locked = True 'ou False

---

il faut ensuite protéger ou déprotéger la feuille :

Code:

---

1 2 3 4 5 6

ActiveSheet.Unprotect "MonMotDePasse" 'dé-protection   'ton code...   ActiveSheet.Protect "MonMotDePasse" 'protection

---

Hervé.

super hervé, merci pour taon aide,
dsl pour le retard mais je n'est pas recu de mail me prevenant que j'avais une réponse.

une dernière question, pourquoi est on obliger de proteger ou deproteger la feuille via un mot de passe aprés un verouillage d'une cellule?
je penser simplment déverouiller les cellule au debut du programme et les verouiller en fin

Bonjour,

Citation:

---

une dernière question, pourquoi est on obliger de proteger ou deproteger la feuille via un mot de passe aprés un verouillage d'une cellule?
je penser simplment déverouiller les cellule au debut du programme et les verouiller en fin

---

C'est le principe de fonctionnement d'Excel. Quand la feuille est protégée il laisse libre d'accès les cellules non verrouillées !
Maintenant, tu peux interdire l'accès à une ou plusieurs cellules sur l'évènement "SelectionChange" de la feuille. Un petit exemple, si tu sélectionne C3 dans la feuille tu sera automatiquement redirigé vers C4 :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Worksheet_SelectionChange(ByVal Target As Range)   If Target.Address(0, 0) = "C3" Then   Range("C4").Select   End If   End Sub

---

Hervé.