> Tous les forums > Forum Bureautique
 Copier la valeur d'une colonne et non la formuleSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
ffttkl
  Posté le 06/02/2008 @ 15:33 
Aller en bas de la page 
Petite astucienne

Bonjour,

j'ai fait ma macro suivante qui me permet de copier certaines colonnes de mon onglet principal vers mon onglet facture, or je souhaite copier la valeur de la colonne AC et non la formule. Qui peut m'aider ?

Sub facture()

Dim cel As Range
Dim bd As String

With Sheets("Facture")
.Range(.[A2], .[AG3].End(xlDown)).Clear

End With
For Each cel In Range([F6], [AA65536].End(xlUp))
If cel.Value = ("UMP") Then
Range(Cells(cel.Row, "B"), Cells(cel.Row, "D")).Copy Sheets("Facture").[A65536].End(xlUp).Offset(1, 0)
Range(Cells(cel.Row, "F"), Cells(cel.Row, "F")).Copy Sheets("Facture").[D65536].End(xlUp).Offset(1, 0)
Range(Cells(cel.Row, "AA"), Cells(cel.Row, "AA")).Copy Sheets("Facture").[E65536].End(xlUp).Offset(1, 0)
Range(Cells(cel.Row, "AC"), Cells(cel.Row, "AC")).Copy Sheets("Factre").[E65536].End(xlUp).Offset(1, 0)
End If
Next
End Sub

Merci de votre aide

Publicité
ffttkl
 Posté le 06/02/2008 à 15:57 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne

bonjour,

desolé mais je vines de supprimer une réponse qui m'a été faite mais qui ne correspond pas à ce que je souhaite

fth
 Posté le 06/02/2008 à 15:59 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour,

Range(Cells(cel.Row, "AC"), Cells(cel.Row, "AC")).Copy

Sheets("Facture").[E65536].End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlValues

Application.CutCopyMode = False

ffttkl
 Posté le 06/02/2008 à 16:38 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petite astucienne
merci beaucoup fth, c'est exactement ce que je voulais. c'est résolu
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
63,99 €Kit 16 Go (2x8 Go) de mémoire DDR4 Crucial Ballistix Sport 3200 MHz à 63,99 €
Valable jusqu'au 17 Février

Amazon fait une promotion sur le kit de 16 Go (2x8 Go) de mémoire DDR4 Crucial Ballistix Sport 3200 MT/s CL 16 qui passe à 63,99 € livré gratuitement alors qu'on le trouve ailleurs à partir de 90 €.  


> Voir l'offre
105,81 €Disque dur externe portable Seagate Expansion 5 To USB 3.0 à 105,81 €
Valable jusqu'au 18 Février

Amazon fait une promotion sur le disque dur externe portable Seagate Expansion d'une capacité de 5 To à 105,81 € livré gratuitement alors qu'on le trouve ailleurs à partir de 130 €. Ce disque dur externe portable au format 2,5 pouces dispose d'une interface USB 3.0 compatible USB 2.0. Une excellente affaire pour ce disque dur qui offre des débits de 115 Mo/s. Il n'est pas soudé et est donc démontable si vous souhaitez le réutiliser ailleurs (console, NAS, PC).


> Voir l'offre
59,99 €Souris Logitech MX Master 2S à 59,99 €
Valable jusqu'au 17 Février

Amazon fait une promotion sur la souris sans fil Logitech MX Master 2S qui passe à 59,99 € livrée gratuitement alors qu'on la trouve ailleurs autour de 85 €. Cette évolution de la MX Master est équipée de la technologie Logitech Flow. Cette dernière, révolutionnaire, vous permet de déplacer le curseur de votre souris d'un ordinateur à un autre (jusqu'à 3 ordinateurs), d'effectuer des copier/coller de textes, d'une images ou encore de fichiers d'une machine à une autre. Vous allez ainsi pouvoir transférer vos contenus entre 3 ordinateurs différents sans la moindre difficulté. 


> Voir l'offre

Sujets relatifs
Comment aller recherche les X dernière valeur d'une colonne
calcul plus grande valeur d'une colonne
Garder valeur dans copie de formule
Copier exemple uniquement colonne 1à 5 de tout le fichierb
Formule pour remplacer une valeur négative par la valeur 0
Renvoyer derniere valeur colonne feuille precedent
Dernière valeur d'une colonne de nombres
comment copier formule d'1 class à l'autre sans li
Copier une formule
formule pour trouver la valeur de X.
Plus de sujets relatifs à Copier la valeur d''une colonne et non la formule
 > Tous les forums > Forum Bureautique