cherche macro

[arnoonthenet]

Voici mon probleme
J'ai un fichier excel avec une centaine de colonnes et plus de 300 lignes
que je voudrais mettre en forme ligne par ligne pour une utilisation dans un script PHP mais il me faudrait que le texte soit de la forme
par exemple
('valeur de la cellule A1', ' valeur de la cellule B1'.......,'valeur de la cellule CB1')
('valeur de la cellule A2', ' valeur de la cellule B2'.......,'valeur de la cellule CB2')


et ainsi de suite pour toutes les lignes

Si quelqu'un pourait m'aider

MERCI

 

[romfret]

Salut !


J'ai pas tres bien compris la question mais cela je pense va t'aider :

a la place de 'valeur de la cellule A1' du peut mettre :

Range("le nom de ta cellule exemple A1").Value


Voila, tiens nous au courant, romfret

 

[michel]

bonsoir Arnoonthenet et Romfret

pour ma part j'ai compris qu'Arno souhaite formater les cellules avec des symboles ( ) ' ,

ci joint une proposition de procédure

Sub insert()
Dim cell As Range

For Each cell In Range("a1:cb300") 'plage à mettre à jour !
Select Case cell.Column
Case 1
cell.Value = "('" & cell.Value & "',"
Case 5
cell.Value = " ' " & cell.Value & "')"
Case Else
cell.Value = " ' " & cell.Value & "',"
End Select
Next

End Sub


j'espere que cela repondra à ta demande...et que j'ai bien compris la question

bonne soirée
michel

 

[michel]

rebonsoir

ouppps ...il est temps d'aller me coucher....

au lieu de case 5, il faut inscrire le nombre de colonnes du tableau à formater


bonne soirée
michel

 

[arnoonthenet]

merci michel
C'est ce que j'avais besoin, j'ai modifié un peu pour avoir exactement le rendu souhaité.

C'est un grand pas pour l'évolution de mon site


Bonne nuit



ARNO