Excel Property Range( cell1, cell2).select
Excel Property Range( cell1, cell2).select - VB/VBA/VBS - Programmation
Marsh Posté le 04-01-2004 à 15:44:33
Parce que Cells(18,19) prend 2 int et nom pas un string "18, 19"
C'est pour ça que ton astuce laCellule = "19, 18" ne fonctionne pas...
Marsh Posté le 06-01-2004 à 21:40:47
| JagStang a écrit : Parce que Cells(18,19) prend 2 int et nom pas un string "18, 19" |
Sujets relatifs:
- [Macro Excel] imprimer/sauvegarder une feuille...
- Sélection de feuille de calcul sous Excel (VBA)
- Lignes saut de page vba excel
- Lancer excel via mon exe c++ builder
- MyOleDb - SELECT MAX(id) FROM table ne fonctionne pas...
- Optimisation d'un remplissage de select! (PHP)
- Recuper la valeur des options selectionnees d'un select
- Multiselection select
- recherche fichier excel 5
- ASP Excel Liaison ouverture
Marsh Posté le 04-01-2004 à 05:48:31
Salutation!!!!
Je ne comprend pas comment faire pour remplacer
Cells(18, 19) dans la fonction Range(cell1, cell2).select
Par une Variable LaCellule
Qui conteindrait «18, 19 »
Voici ce que j'ai fais!
Dim LaDerniereLigne, LaDerniereColonne, LaCellule As Variant
LaDerniereLigne = Selection.Row 'ex:=19
LaDerniereColonne = Selection.Column 'ex:=18
'Ex;1 LaCellule = "Cells(" & LaDerniereLigne & ", " _
'& LaDerniereColonne & " )"
'Resultat LaCellule = "Cells(19, 18)"
'echec
'Ex;2 LaCellule = LaDerniereLigne & ", " & LaDerniereColonne
'Resultat laCellule = "19, 18"
Range(Cells(1, 1), Cells(LaCellule)).Select
'Ca ne donne que la première ligne de A1 à R1 en selection
' Si j'écrit ceci, ca marche
Range(Cells(1, 1), Cells(18, 19)).Select
'Ca donne A1 à R18 en selection
Merci à l'avance!