probléme beug

[jean]

Bon forum,

j'ai creé ce programme pour copier mes 30 premiers valeur de mon fichier soures pour les mettre sur mon fichier destination
mais quan je j'exécute il me dit: l'objet ne gére pas cette propriété ou cette methode et il souligne ( cells(2, i).Selection )
esct ce que quelqu'un a une idée?
merci

Private Sub Command1_Click()

Dim i as integer
''' Ouverture fichier source
Workbooks.Open FileName:= _
'C:\\Nouveau dossier\\zero.xls'

Sheets(1).Select
For i = 1 To 30
cells(2, i).Selection
Selection.Copy
Next i

'creation nouveau classeur
Set XL = New Excel.Application 'ouvre excel
XL.Visible = True
XL.Workbooks.Add 'ouvre un nouveau classeur

Sheets(1).Select
Sheets(1).Activate
Sheets(1).Paste
Windows('zero.xls').Activate
ActiveWorkbook.Close

End Sub

merci d'avance

 

[jean]

j'ai utulisé i pour varier le nombre de colonne

alors toi pour ton procedure,on suppose connaitre avant l'emplacement des donnée das le fichier source
et si ya des données dans les autres colonnes?

 

[PascalXLD]

Bonjour

si tu veux toujours tes 30 colonnes pourquoi une variable

On peut peut-être faire


''' Ouverture fichier source
Workbooks.Open Filename:= _
'C:Nouveau dossierzero.xls'
Range('A1:AD1').Copy


Workbooks.Add 'ouvre un nouveau classeur

ActiveWorkbook.Sheets(1).Paste
Windows('zero.xls').Activate
ActiveWorkbook.Close

Bon courage

Message édité par: Pascal76, à: 20/05/2005 16:28

 

[jean]

non c'est pas pour 30 colonnes mais 30valeurs d'une colonne
mais la question précédente c'était de savoir si on an a d'autre valeurs dans d'autre colonne?

 

[Baside]

Bonjour

Dans Cells(L,C) L c'est pour Lignes et C pour Colonnes

Dans ta formule i était à la place de C donc on pensait que tu voulais Copier une ligne

Baside

 

[mutzik]

Re tous,

Je disais juste c1:c30 pour selectionner la plage de valeurs à copier (qui peut être n'importe laquelle a1:ac1 ...)

mon intervention était juste la pour définir dans quel ordre on doit exécuter les actions

Bertrand

 

[Baside]

Bonjour le fil le forum

On tourne en rond, la solution est plus rapide à trouver quand la question est clairement définie.

Ok Mutzik

Baside

 

[jean]

cell(2,i), c'est vrai il copie par colonne et la ligne est fixe
j'ai du faire une erreur je doit definir i et j cad cell(i, j)

i = 1 à 600 et j = 1 à 5

vous avez pas une idéé comment on le fait?

 

[mutzik]

Jean, le fil

Pourrais tu nous dire EXACTEMENT ce que tu veux.

Copier des lignes, des colonnes, une zone fixe, variable ???????????

Si tu veux qu'on t'aide, il faut que tu nous expose clairement ton prob, et de preference avec un fichier joint

à+
Bertrand

 

[jean]

bonjour mutzik et forum

excuse moi pour mes explications pas claires

j'ai un fichier excel ou de la colonne A à une autre colonne je peut avoir des donnée
je voudrais copier les 600 premiers lignes et la derniere colonne de ce fichier pour le coler sur un autre fichier excel que je cree

j'espére que je suis claire maintenant

merci d'avance

 

[mutzik]

Bonjour Jean, le fil et le forum

ci-joint un exemple de ce que tu veux faire
Si tu ne comprends pas qqchose, ...

a+
Bertrand [file name=copie_20050521152304.zip size=6246]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/copie_20050521152304.zip[/file]

 

[jean]

bonjour mutzik et forum

Est ce que tu peut m'expliquer ce que fait ton programme

merci d'avance