Page 1 sur 1

Posté : 29 sept. 2003, 20:45:00
par Invité
Mon projet est le suivant:
Dans une feuille n°2, la valeur d'une ou plusieurs cellules doivent être égale à  la valeur de la dernière cellule d'une liste, remis à  jour quotidiennement, de la feuille n°1. C'est deux feuilles sont dans un même fichier .XLS.

Ami informaticien, merci de bien vouloir de donner des inforations sur la rédaction de ces cellules en feuille n°2.

Séb <IMG SRC="/images/smiles/sad_smile46.gif">

Posté : 30 sept. 2003, 11:44:00
par Titus
Salut,

Pour cela tu crée le lien suivent dans le cellule de destination de la feuille 2: =$Cadastre.D16 (cette formule est valable pour Star Office, mais sans doute pour Exell aussi), en détail: elle prend la valeur de la cellule D16 de la feuille nomée Cadastre

Posté : 06 oct. 2003, 22:24:00
par philou
Salut,

si j'ai bien tout compris (ce qui est pas certain) <IMG SRC="/images/smiles/teeth_smile46.gif">

tu cliques sur la cellule en question de la feuille 2

tu tapes =

tu sélectionnes la feuille 1 et la cellule relative au total

puis ENTER

à§a fonctionne aussi avec d'autres classeurs, suffit de les ouvrir et de les mettre cà´te à  cà´te, tant que les références (noms et emplacements sur le disque) ne changent pas, les mises à  jours se font directement

@+

Posté : 16 oct. 2003, 21:14:00
par Invité
Non , ce n'est pas la réponse que je souhaiterai. En effet, car la valeur en feuille 2 prens en compte une valeur de la cellule la plus basse dans une liste qui évolue tous les jours.
Tous les jours , je rajoute à  ma liste des informations sur une nouvelle ligne dans un tableau en feuille 1. En feuille 2, il faut que la cellule préalablement choisie soit égale à  la valeur d'une des cellules de la ligne que je vient de créer.Donc tous les jours il faut que automatiquement la valeur change;


merci

seb

Posté : 16 oct. 2003, 23:39:00
par philou
Salut,

en partant du principe (ici, pour cette macro), que :
- les valeurs sont situées sous C1, donc à  partir de C2 et ...
- la cellule A2 de la feuille 2 reprenant le total mis à  jour

1/ tu places un bouton de commande sur ta feuille
2/ ALT + F11
3/ copier /coller de :


Private Sub CommandButton1_Click()

Dim x As Variant

x = Range("C65536").End(xlUp).Row
Range("<font color="red">C</font>" & x + 1).Select
ActiveCell.Value = WorksheetFunction.Sum(Range("<font color="red">C2</font>" & ":" & "<font color="red">C</font>" & x))

Sheets("<font color="red">Feuil2</font>").Range("<font color="red">A2</font>").Value = ActiveCell.Value
ActiveCell.Select
Selection.ClearContents
End Sub

4/ F5


après chaque modif , il suffit de cliquer sur le bouton de commande
(suffit d'adapter la cellule de départ et celle du result dans la macro)

... voilà 

@+