VBA .Copier valeur cellule excel sans formule

Résolu

sanchis81 Messages postés 134 Date d'inscription Statut Membre Dernière intervention -
toto - 13 mai 2013 à 15:06

Bonjour,

j'ai utilisé une macro qui copie le contenu d'une cellule pour le copier dans la dernière ligne non vide d'une colonne.

Malheureusement, si la cellule de départ contient une formule, ce sera la formule qui sera copiée dans la cellule d'arrivée et non la valeur de la cellule de départ.

Voici mon code:

Sub test()
Sheets(1).Cells(1, 1).Copy Sheets(2).Cells(65535, 1).End(xlUp)(2)
End Sub

Que dois-je modifier à ce code pour pouvoir vraiment copier la valeur de la cellule de départ?

A voir également:

Copier le contenu d'une cellule excel sans la formule
Formule si et excel - Guide
Formule excel pour additionner plusieurs cellules - Guide
Formule moyenne excel plusieurs colonnes - Guide
Excel cellule couleur si condition texte - Guide
Aller à la ligne dans une cellule excel - Guide

3 réponses

Réponse 1 / 3

m@rina Messages postés 23880 Date d'inscription Statut Contributeur Dernière intervention 11 464

Bonjour

Essaie ça :

Sub test() 
Sheets(1).Cells(1, 1).Copy 
Sheets(2).Cells(65535, 1).End(xlUp)(2).PasteSpecial Paste:=xlPasteValues
End Sub

m@rina

Réponse 2 / 3

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

bonjour

Essaies plutôt ceci :

Sub test()
Sheets(2).Cells(65535, 1).End(xlUp).value = Sheets(1).Cells(1, 1).value
End Sub

sanchis81 Messages postés 134 Date d'inscription Statut Membre Dernière intervention 10

Merci gbinforme pour ta réponse!

Effectivement, je retrouve maintenant la valeur copiée cependant la macro me la copie dans la première cellule non-vide.

Je crée une macro qui va copier une valeur d'une cellule pour la copier dans la première cellule vide d'une colonne d'une autre feuille.

Ton code permet de copier et coller la valeur de la cellule mais ne me permets plus de remplir la première cellule vide de la colonne.

As tu une idée?

Encore merci pour ta réponse

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724 > sanchis81 Messages postés 134 Date d'inscription Statut Membre Dernière intervention

bonjour sanchis81,

Il suffit de décaler de 1 mais j'avais gardé ta formulation.

Sub test()
Sheets(2).Cells(65535, 1).End(xlUp).offset(1,0).value = Sheets(1).Cells(1, 1).value
End Sub

ced

je voudrais copier tout le contenu d'une feuille excel pour le ranger dans les cellules d'une autre feuille excel en VBA? s'il vous plaît aidez moi

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

Tu as vu que tu t'incrustes dans un sujet qui a 3 ans ?

Si tu veux une réponse, pose une question documentée correctement sur un sujet à toi.

Réponse 3 / 3

sanchis81 Messages postés 134 Date d'inscription Statut Membre Dernière intervention 10

Merci, ca marche. Désolé pour la réponse un peu tardive

m@rina Messages postés 23880 Date d'inscription Statut Contributeur Dernière intervention 11 464

Un peu tardive..., dis-tu ?... 4 ans après !!!! Je rêve ! :(

sanchis81

Mieux vaut tard que jamais

toto

mdrr !

Discussions similaires

Excel VBA : Récupérer la valeur d'une cellule

Macro copier valeurs sans formules

Copier des valeurs sans formules [VB]

Excel si cellule contient texte alors...

Aller chercher une valeur dans une autre feuille

VBA - NE copier que la valeur et non la formule

Votre réponse

Discussions similaires