Offset

Laisse moi rire

XLDnaute Occasionnel
Salut a toutes et tous.

Jusqu'a présent j'utilisai pour récuperer des données.

.Offset(0, 50)= bla, bla,bla

Mais comment faire pour récupérer avec cette méthode plusieurs colonnes, a la suite.

de 0 a 25.

Merci a vous par avance, G'Claire
 

Laisse moi rire

XLDnaute Occasionnel
dg62, le forum

Donc je met un joint vers le fichier.

http://cjoint.com/?lyrURkiDqr

Donc, j'essaye de créer un fichier .txt des résultat (Aprés modifications) de la base de données dans l'userform résultat.

Dans la l'Userform 'renseignements' cela fonctionne(Grace a un internaute, que je remercie), mais je n'arrive pas a adapter dans l'userform 'Resultat'

J'ai une erreur '5'

dans la ligne de la Sub :

SaveAsCSV(Plagetxt As Range, Séparateur As String, _
NomFichierSauvegarde As String)

Temp = Left(Temp, Len(Temp) - 3)

Merci a vous pour votre aide, G'Claire
 

dg62

XLDnaute Barbatruc
Bonjour Gclaire



le code suivant fonctionne.

Code:
Sub SaveAsCSV(Plagetxt As Range, Séparateur As String, _
 NomFichierSauvegarde As String)

 Dim Temp As String, R As Range


 Open NomFichierSauvegarde For Output As #1
 Temp = ''
 For Each R In Selection
    Temp = Temp & R.Value & ';'
 Next
     Print #1, Temp
     Close

 End Sub
 

Laisse moi rire

XLDnaute Occasionnel
DG62, le forum

Merci, cela fonctionne.

Par contre en lien avec ce code.
Ce fichier TXT, j'aimerais pouvoir ouvrire un petit excécutable, qui récupère ce fichier pour me faire un PDF, des données de ce fichier.

Comment appeler cet éxécutable, de manière a ce que cela se fasse en fond, sans passer par dessus excel.

Merci, G'Claire
 

Discussions similaires

Réponses
7
Affichages
405
Réponses
4
Affichages
215
Réponses
3
Affichages
225

Membres actuellement en ligne

Statistiques des forums

Discussions
312 489
Messages
2 088 854
Membres
103 975
dernier inscrit
denry