Combobox et variable (ASP)

Bonjour à tous,
je n'arrive pas à trouver sur le forum une manière d'utiliser la fonction Range avec des variables pour les lignes et les colonnes. Je m'explique :

J'ai Range("40:A500" dans mon code, et je voudrai remplacer A40 et A500 par des variables que j'ai définies précédemment.
Imaginons que mes variables définies avant soient ColL et LigneL, je voudrai remplacer Range(A40:A500) par quelquechose comme :

Range(ColL & LigneL ":" ColL & 500) j'ai beau essayer dans tous les sens et de manières différentes je n'y arrive pas !

Merci d'avance pour votre aide !!

Antoine

Bonjour,
J'ai aussi le problème de ce message à chaque fois que je veux ouvrir Word 2007 version "Office Famille et Etudiant 2007 "
Utilisation de Windows XP SP2 , avec les mises à jour régulières ...

Lorsque je clique sur un fichier .doc pour l'ouvrir :
1- la fenêtre jaune de Office Word 2007 s'ouvre, puis une fenêtre m'annonce : "impossible de créer le fichier de travail . Vérifiez la variable d'environnement TEMP " je clique sur OK
2- Le cadre de Word s'installe à l'écran puis, de nouveau, la même fenêtre , avec le même message concernant le dossier TEMP .
De nouveau je clique sur OK et à ce moment là mon fichier demandé est affiché !
3- P...

Bonjour tout le monde,

Je dois sélectionner une plage de cellules en fonction d'une variable i, qui représente le numéro de la ligne voulue. Suite à des recherches sur ccm.net et d'autres forums, j'ai trouvé le code suivant :

Dim MaPlage As Range MaPlage = Range("A" & i & ":L" & i)

Je suis sur Excel 2003 et qqc cloche : VBA me renvoie "erreur d'éxecution 91 : variable objet ou variable de bloc With non définie". Vraiment, je ne comprends pas. Quelqu'un a une idée ?

Merci d'avance,
Pyanitsa.

Configuration: Windows XP / Firefox 3.6.3

Bonjour,

tout d'abord voici mon code :

Sub RechercheCompo()

Dim plage1 As Range, plage2 As Range, plage3 As Range
Dim Cellule1 As Range, Cellule2 As Range
Set Cellule1 = Range("J6")
Set plage1 = Range("D8:D300").Find(Range("J6").Value, , xlValues)(2, 2)
Set plage2 = Range("D8:D300").Find(Range("J6").Value, , xlValues)(5, 30)
Set plage3 = Range(plage1, plage2)
Dim add As Range, add2 As Range
Set Cellule2 = Range("K6")
Set add = plage3.Find(Cellule2.Value, , xlValues)(1, 1)
Set add2 = plage3.Find(Cellule2.Value, , xlValues)(4, 1)
If Not add Is Nothing Then
Range(add, Range(add, add2)).Select
Else
MsgBox "Désolé !" & C...

Bonjour
En ouvrant Word sous windows 10 il m'affiche le message suivant

impossible de créer le fichier de travail.verifiez la variable d'environnement TEMP

En outre je n'arrive plus à enregistrer les modifs de mes fichiers word