Extraire données

Fermé
Capitaine Trop top Messages postés 25 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 mars 2013 - 18 févr. 2013 à 11:54
Capitaine Trop top Messages postés 25 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 mars 2013 - 19 févr. 2013 à 15:05
Bonjour,

je voudrais solliciter votre aide aujourd'hui car j'ai un fichier excel avec des données client sur une feuille je voudrais les extraire vers une autre feuille afin d'effectuer des calculs sur ces données là , grâce à une macro ou une commande vba je vous remercie d'avance pour votre aide

A voir également:

2 réponses

via55 Messages postés 14502 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 9 décembre 2024 2 736
18 févr. 2013 à 13:14
Bonjour

Pourquoi vouloir passer par du VBA alors que tu peux

ou dupliquer simplement la 1ere feuille par clic dur l'onglet

ou copier les données et les coller dans une autre

ou les inserer dans la 2nde feuille par formule style =Feuil1!A1

ou créer un tableau dynamique croisé sur une nouvelle feuille

Cdlmnt
0
Capitaine Trop top Messages postés 25 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 mars 2013
18 févr. 2013 à 14:34
Je sais mais je voudrais automatiser la chose genre à chaque fois que je rentre les données d'un client sur la feuille client , elle me sort directement les données sur l'autre feuille pour effectuer les calculs
0
via55 Messages postés 14502 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 9 décembre 2024 2 736
18 févr. 2013 à 15:47
Que veux tu exactement ?

Que si tu as rentres des données dans la feuille Client par en B2, C2,D2 elles soient copiées dans la feuille Calcul en B2, C2,D2
ou que lorsque tu rentres des données client en B2, C2,D2 ou en B5,C5,D5 elles soient copiées toujours dans calcul B2,C2 et D2 ?
0
Capitaine Trop top Messages postés 25 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 mars 2013
18 févr. 2013 à 16:10
si je rentre des données client en B2 C2 D2 elle soit recopier dans une autre feuille en B2 C2 D2
0
via55 Messages postés 14502 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 9 décembre 2024 2 736
18 févr. 2013 à 16:27
Ouvrir Editeur avec ALT F11
Dans le worksheet de la feuille correspondant au client mettre le code :

Private Sub Worksheet_Change(ByVal Target As Range)

nom2 = "Feuil3"
x = Target.Row
y = Target.Column
Sheets(nom2).Cells(x, y).Value = ActiveSheet.Cells(x, y).Value

End Sub

En remplaçant Feuil3 par le nom de ta feuille de calcul

Est ce bien ce que tu désirais ?

Cdlmnt
0
Capitaine Trop top Messages postés 25 Date d'inscription lundi 18 février 2013 Statut Membre Dernière intervention 20 mars 2013
18 févr. 2013 à 16:59
c'est bien ce que je désire mais là je me rend compte d'un problème c'est que le tableau sur la feuille source n'est pas dispatché de la même manière que dans la feuille calcul est ce que c'est possible d'extraire une à une chaque donnée ?
0
via55 Messages postés 14502 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 9 décembre 2024 2 736
18 févr. 2013 à 17:13
oui mais il faut savoir chaque fois où la mettre !
donc faire des conditions dans ton code style
xs=target.row:ys=target.column
if target.address="$B$2" then xd=3:yd=5
if .......
et à la fin des if changer la ligne
Sheets(nom2).Cells(xd, yd).Value = ActiveSheet.Cells(xs, ys).Value

c'est pour cela que je pense que c'est plus pratique de faire référence dans la feuille de calcul à la feuille client sans passer par du vba
si tu veux en B2 de calcul ce qu'il a en A2 de la feuille nommée "client" dans le même classeur il suffit dans la cellule B2 de mettre =client!A2

A toi de voir !
0