Création fiche personnel

C

Compte Supprimé 979

Guest

• 20 Juillet 2012

• #2

Re : Création fiche personnel

Bonjour Sapheron et bienvenue sur ce forum

Merci de joindre un fichier avec ton code sans données confidentielles (1 a 2 lignes suffisent)

A+

 

Vote positif 0 Vote négatif

S

sapheron

Guest

• 20 Juillet 2012

• #3

Re : Création fiche personnel

Bonjour BrunoM45 et merci

Je t'envoie le lien pour télécharger mon fichier via free

Free - Envoyez vos documents

sinon mon code je pense qu'il a été envoyé avec le fichier sinon le voici

Sub exemple()
'
' exemple Macro
' Macro enregistrée le 20/07/2012 par
'

'
Sheets("Fiche pénibilité salarié (ex)").Select
ActiveCell.Select
ActiveCell.FormulaR1C1 = "='Grille de pénibilité berry'!R[-2]C"
ActiveCell.Offset(9, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = _
"='Grille de pénibilité berry'!R[-11]C*'Grille de pénibilité berry'!R[4]C"
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveCell.FormulaR1C1 = _
"='Grille de pénibilité berry'!R[-12]C*'Grille de pénibilité berry'!R[4]C"
ActiveCell.Offset(1, 0).Range("A1").Select
ActiveCell.FormulaR1C1 = _
"='Grille de pénibilité berry'!R[-13]C*'Grille de pénibilité berry'!R[4]C"
ActiveCell.Offset(-2, 0).Range("A1:A3").Select
Selection.AutoFill Destination:=ActiveCell.Range("A1:G3"), Type:= _
xlFillDefault
ActiveCell.Range("A1:G3").Select
End Sub

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 20 Juillet 2012

• #4

Re : Création fiche personnel

Re,

Pour moi, inutile de passer par du VBA, regarde le fichier ci-joint si cela te convient

J'ai défini un nom "ListeSalariés" pour la liste de validation,
mis quelques formules à base de EQUIV() et INDEX()

tu as juste à sélectionner le salarié dans la liste et les valeurs se calcul en fonction

A+

 

Pièces jointes

• Sapheron_FicheDePénibilité.xls

  42 KB · Affichages: 587

Vote positif 0 Vote négatif

S

sapheron

Guest

• 20 Juillet 2012

• #5

Re : Création fiche personnel

Re,

Je te remercie ce fichier est encore mieux que ce que je voulais à la base.
Merci d'avoir consacré de ton temps pour m'aider

A+

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 20 Juillet 2012

• #6

Re : Création fiche personnel

Re,

sapheron à dit:

Je te remercie ce fichier est encore mieux que ce que je voulais à la base.

Cliquez pour agrandir...

Tant mieux 😉

sapheron à dit:

Merci d'avoir consacré de ton temps pour m'aider

Cliquez pour agrandir...

De rien, c'est un plaisir de pouvoir aider

A+

 

Vote positif 0 Vote négatif

S

sapheron

Guest

• 20 Juillet 2012

• #7

Re : Création fiche personnel

Re,

En réalité il y a une chose que j'ai pas compris c'est où tu utilise les deux formules car je n'est pas réussi à les trouver?

Je te remercie d'avance

 

Vote positif 0 Vote négatif

S

sapheron

Guest

• 20 Juillet 2012

• #8

Re : Création fiche personnel

Re,

C'est bon j'ai trouvé en fait

A+

 

Vote positif 0 Vote négatif

S

sapheron

Guest

• 23 Juillet 2012

• #9

Re : Création fiche personnel

Bonjour,

Excuse moi de te déranger mais j'ai encore une question.
Comment tu a fait pour que les cellules qui calcul mon temps d'exposition aux risques se modifie en fonction du choix de la liste déroulante?

Merci

 

Vote positif 0 Vote négatif

C

Compte Supprimé 979

Guest

• 23 Juillet 2012

• #10

Re : Création fiche personnel

Salut 😉

Dans ta cellule B15, tu as une formule

Code:

=$A14*INDEX('Grille de pénibilité berry'!$B6:$H19;EQUIV($A8;ListeSalariés;0);COLONNE()-1)

J'utilise pour cela, la fonction INDEX(Matrice;NoLig;NoCol)
qui te retourne la valeur située au numéro de ligne et de colonne de la zone (Matrice)

Le numéro de ligne est retournée par la fonction EQUIV(ValeurCherchée;Matrice;Type)
La valeur cherchée, ici, est le nom du salarié
La Matrice est la zone des noms définit "ListeSalariés"
Type = 0 = recherche strictement égale à la valeur

Le numéro de colonne est retournée tout simplement par la fonction COLONNE()

La valeur retournée est le pourcentage d'occupation du temps qui est multiplié par la cellule A14 qui est le nombre d'heures

J'espère que ce sera plus clair 😉😱

A+

 

Vote positif 0 Vote négatif

S

sapheron

Guest

• 23 Juillet 2012

• #11

Re : Création fiche personnel

Re,

Je te remercie encore grâce a toi c'est limpide 😀 .
Encore merci d'aider le novice que je suis en excel

A+

 

Vote positif 0 Vote négatif