[Lauratus]

Un petit coin pour échanger sur des questions/réponses concernant Word, Excel & Acess
On bug? on a un trou? Une demande de renseignement? Viendez:twisted:

[Ellys]

Bonjour je souhaite avoir de l"aide concernant le logiciel excel, je dois faire un devoir et je bloque sur des formules fonction"ANNEE", liste déroulante,
Merci

[Aptère]

La fonction ANNEE permet d'extraire l'année d'une date.

exemple :
Si dans la cellule A1 contient 09/05/2013
La cellule A2 qui contient =ANNEE(A1) va te donner 2013

[Ellys]

Bonjour je n'arrive pas a appliquer la formule
a partir d'une année et d'une date de naissance afin de trouver l'age

[Aptère]

Si la cellule A1 contient la date de naissance : 13/07/1955
Si la cellule A2 contient l'année : 2013
La cellule A3 qui contient la formule = A2 - ANNEE(A1) te donne l'âge à condition de donner à la cellule A3 le format Standard ou le Standard Nombre avec Nombre de décimales égal à 0.

Bon courage.

[Littlekevin]

[Ellys]

Bonjour,
Je te remercie pour la formule mais je n'ai pas vraiment compris

[Ellys]

Si tu es d'accord et dispo , est ce que l'on pourrait se voir afin de me donner des indications pour faire un devoir sur excel à bientôt peut être
cordialement

[Aptère]

Je trouve intéressant ce genre de rubrique, mais j’y vois deux freins.

La première est de rédiger une question correctement. Par exemple, on ne peut pas donner l’âge à partir d'une date de naissance et d’une année. Si je suis né le 13/07/1955, j’aurai 57 ou 58 ans en 2013. Je ne peux donner comme réponse que l’intervalle de temps [57 ; 58]. L’âge se calcule à partir d'une date de naissance et d’une date de référence.

Reste ensuite à savoir ce qui aide le plus celui qui a posé la question, à savoir donner une réponse correcte brute, ou mettre simplement sur la voie ?

Il est intéressant de savoir que l’on peut automatiser des travaux avec des macros, ou mieux encore avec un langage de programmation comme Visual Basic.

Par exemple, on peut en tapant une année, obtenir un calendrier sur une feuille Excel par exemple.

En couplant un tableur Excel et la programmation, on peut s’initier à la programmation et avoir un outil assez rapide à mettre en œuvre.

[Ellys]

Bonjour je te remercie de prendre le temps de me repondre, je pense que tu es assez doué en informatique et moi je suis un peu nulle, c'est pour cela que le langage que tu emploies ne me parles pas vraiment
Je souhaitais rencontrer une personne physique pour essayer d'avancer sur un devoir car je n'arrive pas même avec you tube et autre
cordialement

[Aptère]

Donne le texte de ce qui te bloque dans ton devoir.

[Fadiese]

Bonjour,

Je souhaite comparer deux fichiers excel qui sont construits pareil (l'un étant une copie de l'autre) en sachant que le second a pu subir des modifications de valeurs uniquement, la structure restant la même.

Sur le net j'ai trouvé un ou deux comparateurs mais qui demandent des critères de tri, par exemple quelle colonne comparer, etc. Moi je veux faire une comparaison globale (limite cellule par cellule ou bien par nom de champ s'il sait faire) sans entrer dans le détail du fichier et que ça me récite les différences à la fin.

Je recherche donc un logiciel qui permettrait de faire cela mais une macro VBA ne me dérange pas non plus ça me donnera l'occasion de m'y mettre

Merci pour toute aide.

[Aptère]

Sub Comparer()
For ligne = 1 To 4
For colonne = 1 To 3
Cells(ligne, colonne).Select
If Sheets("Feuil1").Cells(ligne, colonne) <> Sheets("Feuil2").Cells(ligne, colonne) Then MsgBox ("Erreur cellule ") & ActiveCell.Address
Next colonne
Next ligne
End Sub

Cette routine va comparer deux à deux toutes les cellules de la feuille "Feuil1" et la feuille "Feuil2" sur une plage de 3 colonnes et de 4 lignes.
A chaque différence entre deux cellules, une boîte de dialogue affiche l'adresse de la cellule ; la cellule est sélectionnée.

A suivre...

[Fadiese]

[Aptère]

Tu peux rajouter une troisième feuille sur laquelle seules les cellules différentes sont indiquées avec le mot "Erreur"

Sub Comparer()
For ligne = 1 To 4
For colonne = 1 To 3
If Sheets("Feuil1").Cells(ligne, colonne) <> Sheets("Feuil2").Cells(ligne, colonne) Then
Cells(ligne, colonne).Select
Sheets("Feuil3").Cells(ligne, colonne) = "Erreur"
End If
Next colonne
Next ligne
End Sub

Tu lances la routine qui compare les deux premières feuilles et qui écrit les différences sur la troisième.