derniere colonne remplie - VB/VBA/VBS - Programmation
Marsh Posté le 31-05-2005 à 20:53:33
Range("A1" ).Select 'selection de la premiere colonne |
C'est plutôt sélection de la première cellule...
Mais pour un Paste, je comprends ce que tu veux dire.
Voici ce que tu cherches:
Dim iLastCol As Integer |
Marsh Posté le 03-06-2005 à 08:56:12
Merci pour ta réponse mais ça ne fonctionne pas
ça colle les réponses dans la colonne J invariablement (en effaçant les données precedente s'il y en avais)
De plus je me suis aperçu d'un autre probleme,
en fait je voudrais recuperer des resultats du premier fichier mais dans celui ci les cellules contenant le resultat contiennent une formule qui interragi avec d'autre cellule de ce meme fichier, ainsi lorsque je copie les cellules qui m'interessent je ne copie que la formule qui donne toujours 0 puisque elle fait appel a des cellules qui sont vides dans le nouveau fichier
Marsh Posté le 03-06-2005 à 09:03:46
Désolé en fait ton code marche, c'est moi qui suis pas reveillé (j'ai placé la ligne de code avant d'avoir ouvert le 2nd fichier ce qui fait que ça enregistrait la valeur de la derniere colonne du premier fichier donc...^^)
Mais en revanche j'ai toujours mon probleme de copie de la formule et non pas de la valeur toute simple
Marsh Posté le 06-06-2005 à 09:14:09
j'ai trouvé il suffit de faire un collage spécial :
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Marsh Posté le 31-05-2005 à 09:23:43
Bonjour a tous
Voila je vien de debuter en vba et on m'as confié un projet de stage la dessus
je dois créer une macro sur un questionnaire qui sera envoyé puis la reponse sera receptionnée chez moi sous forme de doc excel puis archivé dans un autre doc excel qui recensera ttes les reponses des formulaires( tout ce que j aurais a faire c'est ouvrir la reponse cliquer sur la macro)
ma macro est sensée prendre les données d'un colonne,ouvrir un autre fichier excel (deja existant) et placer les données dans la premiere colonne vide qu'elle recontrera)
pour l instant j ai fais ça :
Range("L7:L121" ).Select 'selection de la colonnes de resultat(connue)
Selection.Copy 'copie de la selection
Workbooks.Open Filename:="C:\doc.xls" 'ouverture du fichier archive
Range("A1" ).Select 'selection de la premiere colonne
ActiveSheet.Paste 'collage dans l'archive
ActiveWorkbook.Save 'sauvergage du changement
ActiveWorkbook.Close 'fermeture de la feuille
voila donc j aurais voulu savoir comment faire pour
que la selection de la premiere colonne se transforme en selection de la premiere colonne vide
j'ai cherché mais je ne voit pas comment faire
et sinon si je change manuelement la colonne les 2 colonnes sont remplies de #REF! je ne comprend pas pourquoi
Voila merci d avance