fonction array

S

stephane

Guest

• 4 Mars 2006

• #2

oublier fichier [file name=array.zip size=4951]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/array.zip[/file]

 

Pièces jointes

• array.zip

  4.8 KB · Affichages: 52

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 4 Mars 2006

• #3

Bonjour

je suppose que dans ta colonne A tu as suite de fichier .txt

Alors cela donnerait en macro

Option Explicit

Sub moinstxt()

Dim x As Integer

For x = 1 To Range('A65536').End(xlUp).Row
    If Right(Range('A' & x), 4) = '.txt' Then Range('B' & x) = Left(Range('A' & x), Len(Range('A' & x)) - 4)
Next

End Sub

Cliquez pour agrandir...

Bon WE

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 4 Mars 2006

• #4

Re

Bon je n'avais pas vu ton fichier mais j'avais la bonne conclusion [file name=steph_20060304164324.zip size=7249]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/steph_20060304164324.zip[/file]

 

Pièces jointes

• steph_20060304164324.zip

  7.1 KB · Affichages: 47

Vote positif 0 Vote négatif

S

stephane

Guest

• 4 Mars 2006

• #5

je vous remercie pour votre rapidite
et en plus sa marche

a+
stephane

 

Vote positif 0 Vote négatif

PascalXLD

XLDnaute Barbatruc

• 4 Mars 2006

• #6

Re

Tu sais on peut se tutoyer et sinon trop marrant ta réponse:
je vous remercie pour votre rapidite
et en plus sa marche

tu as presque l'air étonné 🙂 🙂

Bon WE

 

Vote positif 0 Vote négatif