selection de cellules dans excelRésolu

Question

Salut sallut

he ben j'en fini pas lol

Voila, mon pb maintenant, c'est que via VB6, je n'arrive pas &#224; selectionner un groupe de cellules sous excel.
En fait lors de tout mon programme g manipuler les cellules gr&#226;ce &#224; des chiffres, alors pour d&#233;signer une cellule, je disait m"mettre tel truc dans la cellule 7,5" par exemple.
Mais apparamment, selon une macro que j'ai enregistr&#233;, pour selectionner un groupe ce serait "selectionner (a5:g9)"
Donc pas du tout le m&#234;me format.
Savez vous s'il y a un autre moyen de faire la s&#233;lection d'un groupe de cellules?

Merci bcp

BIz

ndsaerith · Accepted Answer

Oki merci Ca y est &#231;a marche !!!!!!!!!!!!!!!

MERCI BCP BCP BCP BCP.
Gros biz &#224; vous deux
Merci

BIz

mrdep1978 · Answer

La r&#233;ponse est .... oui je le sais !!

Range(cells(1,5),cells(7,9))

mrdep1978 · Answer

Oups, j'ai invers&#233; les lignes et les colonnes ...

Range(cells(5,1),cells(9,7))

ndsaerith · Answer

Salut,

merci pour le conseil :-)

Par contre il veut pas des virgules entre ligne et colonne.

J'ai mis :
   xlapp.range ((lignetitre, colonnetitre),(ligne,colonne))

Et il croit d&#232;s la 1&#232;re virgule qu'il passe aux coordonn&#233;esd e la cellule suivante.

Sait tu quoi faire?

BIz

cs_ITALIA · Answer

a noter que :

Range(Cells(1, 1), Cells(5, 3)).Font.Italic = True

correspond &#224; la plage : A1:C5 

It@li@

cs_ITALIA · Answer

tu peux aussi faire :

Range(Cells("A1"), Cells("C5")).Font.Italic = True

It@li@

ndsaerith · Answer

Oui excusez moi, g oublier de mettre que j'avais bien mis "cells".
Je comprend pas, m&#234;me en inversant &#231;a marche pas, il attend une ")" il dit.
Il y a peut &#234;tre une fa&#231;on sp&#233;ciale de mettre une variable dans cette ligne de commande, &#224; la place des chifres directement?

BIz

cs_ITALIA · Answer

For rwIndex = 1 to 4
    For colIndex = 1 to 10
        If Worksheets("Sheet1").Cells(rwIndex, colIndex) < .001 Then
            Worksheets("Sheet1").Cells(rwIndex, colIndex).Value = 0
        End If
    Next colIndex
Next rwIndex
It@li@

mrdep1978 · Answer

Ce code l&#224; fonctionne:
J'ai utilis&#233; une variable ls_Range pour pouvoir manipuler la zone plus facilement
Si tu veux juste mettre la zone en gras, tu n'es pas oblig&#233; de mettre le .select

Public Sub test()
Dim xlapp As Object     'Excel.Application
Dim ls_Range As Object  'Excel.Range


Set xlapp = CreateObject("Excel.Application")
'Ajoute un classeur
xlapp.Workbooks.Add
'Affiche l'application
xlapp.Visible = True
'Definit ls_Range avec la zone de A1 a E6
Set ls_Range = xlapp.Range(xlapp.Cells(1, 1), xlapp.Cells(6, 5))
'S&#233;lectionne graphiquement la zone
ls_Range.Select
'Met la zone en gras
ls_Range.font.bold = true
'Quitte Excel
'xlapp.Quit
'Set xlapp = Nothing
End Sub

Selection de cellules dans excel

9 réponses

Discussions similaires