Manipulation objet: Comment désigner une autre colonne

Bonjour,

Je ne maitrise pas du tout les codes objets et cherche à contrôler si une colonne est vide pour agir, mais je ne sais comment faire (ligne en gras).

Voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Open "D:\Votants.csv" For Output As #1 For Each oL In Plage.Rows 'pour chaque ligne de la plage if colonne Q de la même ligne est vide then 'si la colonne "Q" est vide faire Tmp = "" For Each oC In oL.Cells 'pour chaque colonne de ligne Tmp = Tmp & CStr(oC.Text) & Sep Next Tmp = Left(Tmp, Len(Tmp) - 1) 'supression du dernier séparateur Print #1, Tmp 'impression dans le fichier CSV End If Next Close 'ferme le fichier CSV

---

Quelqu'un saura-t-il m'aider, svp?

Bonjour

Citation:

---

Quelqu'un saura-t-il m'aider, svp?

---

Et toi : sauras-tu nous dire, pour commencer, où et comment tu as déclaré et initialisé la variable Plage ?

Intéresse-toi par ailleurs aux propriétés/collections Rows et Columns

Oui! unparia,
voici:

Code:

---

1 2 3

Sub ExporteCSV() Dim Plage As Object, oL As Object, oC As Object, Tmp As String, chemin As String, Sep$ Set Plage = ActiveSheet.Range("B6:C" & ActiveSheet.Range("C65000").End(3).Row)

---

je regarde les collections Rows et Columns...merci

Bon.
Voilà donc comment elle a été DECLAREE (et mal - trop inutilement évasivement - déclarée. Une plage est un objet Range).

C'est un code que j'ai repris.

voila le début du code entier:

Code:

---

1 2 3 4 5 6 7 8 9

Dim Plage As Object, oL As Object, oC As Object, Tmp As String, chemin As String, Sep$   chemin = "D:monfichier.xlsm" Worksheets("Votes").Select Sep = ","   'Définie la plage de recherche Set Plage = ActiveSheet.Range("B6:C" & ActiveSheet.Range("C65000").End(3).Row)

---

Citation:

---

Une plage est un objet Range

---

Bonjour,

je pense que tu te simplifierais la tache en ouvrant directement ton fichier Csv sous Excel

or d'après ce que je vois de ton code tu l'ouvres en format texte (A moins que je sois bigleu 8O ...)

A+

Bonsoir,

Je vous informe que mon code fonctionne !
donc bien que plage soit de type "range" manifestement cela ne plante pas le système.

Je me suis peut-être mal exprimé, mais ce que je fais à travers ce code c'est prendre la valeur des colonnes B et C à partir de la ligne 6 jusqu'à la dernière ligne pleine.

Ce que je souhaite faire, c'est ne plus prendre systématiquement toutes les lignes, mais seulement celles pour lesquelles il n'y a rien d'écrit dans la colonne "Q".
voyez-vous?:?

Bonjour,

avec SpecialCells tu peux avoir directement un range des cellules vides. Tu auras les lignes qui t'intéressent directement.

Et ce que voulait te dire unparia c'est qu'il faut typer les variables au plus près de la réalité. C'est là où tu auras le plus d'efficacité (enfin ton code) et le plus d'aide de l'éditeur (auto-complétion).
eric