après pas mal d'essais en dernier espoir je m'adresse au forum.
Je cherche a extraitre d'un tableau qui est une table de plongée ( extrait
ci-joint )
http://cjoint.com/data/gzrEUQUlQC.htm
la valeur des temps des paliers en fonction de:
1) la prodondeur =1ère colonne et
2) en fonction du temps= 2ème colone
la profondeur va de 3 m en 3 m de 12 à 60 mètres
le temps de 9' à 125'
il faut que la résultat répondent aussi aux critères de sécurité de plongée,
c-a-d
qu'il fgaut aller dans le sens de la sécurité, donc arrondir a la prochaine
valeur de la table,
si l'on rentre pax exemple:
profondeur 40 m et durée 20'
il faudra obtenirles valeurs des paliers pour une plongée de : 42m 21'
paliers = 0' 0' 2' 4' 10' F'
Encore merci de vos contributions qui fonctionnent bien sur l'exemple
en retranscrivant vos formules avec la table de plongée complète, cela ne fonctionne que jusqu'à la ligne 27
Question: N'y-a-t-il pas une limite de nombre de ligne ?
la table complète comporte 110 lignes + 1 d'entêtes = total 111
Au plaisir de vous lire
Claude
Petite modif pour entrer une profondeur ne correspondant pas à une valeur du tableau :
http://cjoint.com/?gAjSKD2SEX
AV
FxM
Bonjour,
C'est effectivement plus que probable. Merci d'avoir assuré l'intérim durant mon dodo :o)
@+ FxM
Bonsoir,
vraisemblablement ' palier ' déjà dans le fichier!
lSteph "Claude" a écrit dans le message de news:
Bonsoir FxM
Super. cela fonctionne super bien dans un fichier EXCEL avec un seul onglet. mais si je copie cet onglet dans mon foichier original y compris le module je reçois le message d'erreur
nom ambigu détecté: palier
J'oserais vous demander une piste
Encore mille merci
Claude
Bonsoir,
Je ne savais pas que français et suisses utilisaient des méthodes différentes.
Voici ce à quoi je suis arrivé via une fonction perso : (alt-f11 | insertion | module, y copier ce qui suit) Public Function palier(profondeur, duree) Application.Volatile
'définition des variables Dim proin As Integer, durin As Integer Dim ligori As Long, colori As Integer Dim ligne As Long Dim protab As Variant
'ligne et colonne de la fonction appelante ligori = Application.Caller.Row colori = Application.Caller.Column
'parcourir les lignes pour trouver la profondeur ligne = 1 protab = Cells(ligne, profondeur.Column).Value Do Until proin <= protab Or ligne >= ligori ligne = ligne + 1 protab = Cells(ligne, profondeur.Column).Value Loop
'poursuivre jusqu'à avoir la durée protab = Cells(ligne, duree.Column).Value Do Until durin <= protab Or ligne >= ligori ligne = ligne + 1 protab = Cells(ligne, duree.Column).Value Loop
'a ce moement, ligne correspond à la ligne choisie palier = Cells(ligne, colori) End Function 'copier jusque là
Usage : Si la profondeur est en A32, la durée en B32 et que tu cherches le premier palier à mettre en C32 : =palier($A32;$B32) Formule qui peut être recopiée.
En résumé : http://cjoint.com/?gzvluScXFx
@+ FxM
Merci du lien.
Cela ne répond pas à ma demande, d'une part car j'utilise des tables 'Suisse' et le lien ne donne que les paliers pour un table Française. d'autre part j'ai besoin du résultat pour renteer dans des calculs de consommation
Claude
Bonjour
après pas mal d'essais en dernier espoir je m'adresse au forum.
Je cherche a extraitre d'un tableau qui est une table de plongée ( extrait ci-joint )
http://cjoint.com/data/gzrEUQUlQC.htm
la valeur des temps des paliers en fonction de: 1) la prodondeur =1ère colonne et 2) en fonction du temps= 2ème colone
la profondeur va de 3 m en 3 m de 12 à 60 mètres le temps de 9' à 125'
il faut que la résultat répondent aussi aux critères de sécurité de plongée, c-a-d qu'il fgaut aller dans le sens de la sécurité, donc arrondir a la prochaine valeur de la table,
si l'on rentre pax exemple: profondeur 40 m et durée 20'
il faudra obtenirles valeurs des paliers pour une plongée de : 42m 21' paliers = 0' 0' 2' 4' 10' F'
Avez-vous une piste ?
merci d'avance
Claude
c.m.m AT bluewin.ch
Bonjour,
C'est effectivement plus que probable.
Merci d'avoir assuré l'intérim durant mon dodo :o)
@+
FxM
Bonsoir,
vraisemblablement ' palier ' déjà dans le fichier!
lSteph
"Claude" <Claude@discussions.microsoft.com> a écrit dans le message de news:
5BBE79AE-EEAF-43CB-96A0-55B2BEF06013@microsoft.com...
Bonsoir FxM
Super. cela fonctionne super bien dans un fichier EXCEL avec un seul
onglet.
mais si je copie cet onglet dans mon foichier original y compris le
module
je reçois le message d'erreur
nom ambigu détecté: palier
J'oserais vous demander une piste
Encore mille merci
Claude
Bonsoir,
Je ne savais pas que français et suisses utilisaient des méthodes
différentes.
Voici ce à quoi je suis arrivé via une fonction perso :
(alt-f11 | insertion | module, y copier ce qui suit)
Public Function palier(profondeur, duree)
Application.Volatile
'définition des variables
Dim proin As Integer, durin As Integer
Dim ligori As Long, colori As Integer
Dim ligne As Long
Dim protab As Variant
'ligne et colonne de la fonction appelante
ligori = Application.Caller.Row
colori = Application.Caller.Column
'parcourir les lignes pour trouver la profondeur
ligne = 1
protab = Cells(ligne, profondeur.Column).Value
Do Until proin <= protab Or ligne >= ligori
ligne = ligne + 1
protab = Cells(ligne, profondeur.Column).Value
Loop
'poursuivre jusqu'à avoir la durée
protab = Cells(ligne, duree.Column).Value
Do Until durin <= protab Or ligne >= ligori
ligne = ligne + 1
protab = Cells(ligne, duree.Column).Value
Loop
'a ce moement, ligne correspond à la ligne choisie
palier = Cells(ligne, colori)
End Function
'copier jusque là
Usage :
Si la profondeur est en A32, la durée en B32 et que tu cherches le
premier palier à mettre en C32 : =palier($A32;$B32)
Formule qui peut être recopiée.
En résumé : http://cjoint.com/?gzvluScXFx
@+
FxM
Merci du lien.
Cela ne répond pas à ma demande,
d'une part car j'utilise des tables 'Suisse' et le lien ne donne que
les
paliers pour un table Française.
d'autre part j'ai besoin du résultat pour renteer dans des calculs de
consommation
Claude
Bonjour
après pas mal d'essais en dernier espoir je m'adresse au forum.
Je cherche a extraitre d'un tableau qui est une table de plongée (
extrait
ci-joint )
http://cjoint.com/data/gzrEUQUlQC.htm
la valeur des temps des paliers en fonction de:
1) la prodondeur =1ère colonne et
2) en fonction du temps= 2ème colone
la profondeur va de 3 m en 3 m de 12 à 60 mètres
le temps de 9' à 125'
il faut que la résultat répondent aussi aux critères de sécurité de
plongée,
c-a-d
qu'il fgaut aller dans le sens de la sécurité, donc arrondir a la
prochaine
valeur de la table,
si l'on rentre pax exemple:
profondeur 40 m et durée 20'
il faudra obtenirles valeurs des paliers pour une plongée de : 42m
21'
paliers = 0' 0' 2' 4' 10' F'
C'est effectivement plus que probable. Merci d'avoir assuré l'intérim durant mon dodo :o)
@+ FxM
Bonsoir,
vraisemblablement ' palier ' déjà dans le fichier!
lSteph "Claude" a écrit dans le message de news:
Bonsoir FxM
Super. cela fonctionne super bien dans un fichier EXCEL avec un seul onglet. mais si je copie cet onglet dans mon foichier original y compris le module je reçois le message d'erreur
nom ambigu détecté: palier
J'oserais vous demander une piste
Encore mille merci
Claude
Bonsoir,
Je ne savais pas que français et suisses utilisaient des méthodes différentes.
Voici ce à quoi je suis arrivé via une fonction perso : (alt-f11 | insertion | module, y copier ce qui suit) Public Function palier(profondeur, duree) Application.Volatile
'définition des variables Dim proin As Integer, durin As Integer Dim ligori As Long, colori As Integer Dim ligne As Long Dim protab As Variant
'ligne et colonne de la fonction appelante ligori = Application.Caller.Row colori = Application.Caller.Column
'parcourir les lignes pour trouver la profondeur ligne = 1 protab = Cells(ligne, profondeur.Column).Value Do Until proin <= protab Or ligne >= ligori ligne = ligne + 1 protab = Cells(ligne, profondeur.Column).Value Loop
'poursuivre jusqu'à avoir la durée protab = Cells(ligne, duree.Column).Value Do Until durin <= protab Or ligne >= ligori ligne = ligne + 1 protab = Cells(ligne, duree.Column).Value Loop
'a ce moement, ligne correspond à la ligne choisie palier = Cells(ligne, colori) End Function 'copier jusque là
Usage : Si la profondeur est en A32, la durée en B32 et que tu cherches le premier palier à mettre en C32 : =palier($A32;$B32) Formule qui peut être recopiée.
En résumé : http://cjoint.com/?gzvluScXFx
@+ FxM
Merci du lien.
Cela ne répond pas à ma demande, d'une part car j'utilise des tables 'Suisse' et le lien ne donne que les paliers pour un table Française. d'autre part j'ai besoin du résultat pour renteer dans des calculs de consommation
Claude
Bonjour
après pas mal d'essais en dernier espoir je m'adresse au forum.
Je cherche a extraitre d'un tableau qui est une table de plongée ( extrait ci-joint )
http://cjoint.com/data/gzrEUQUlQC.htm
la valeur des temps des paliers en fonction de: 1) la prodondeur =1ère colonne et 2) en fonction du temps= 2ème colone
la profondeur va de 3 m en 3 m de 12 à 60 mètres le temps de 9' à 125'
il faut que la résultat répondent aussi aux critères de sécurité de plongée, c-a-d qu'il fgaut aller dans le sens de la sécurité, donc arrondir a la prochaine valeur de la table,
si l'on rentre pax exemple: profondeur 40 m et durée 20'
il faudra obtenirles valeurs des paliers pour une plongée de : 42m 21' paliers = 0' 0' 2' 4' 10' F'
Avez-vous une piste ?
merci d'avance
Claude
c.m.m AT bluewin.ch
FxM
Bonjour,
Jette un oeil dans "insertion | nom | définir".
@+ FxM
Boonsoir
Encore merci de vos contributions qui fonctionnent bien sur l'exemple
en retranscrivant vos formules avec la table de plongée complète, cela ne fonctionne que jusqu'à la ligne 27
Question: N'y-a-t-il pas une limite de nombre de ligne ?
la table complète comporte 110 lignes + 1 d'entêtes = total 111
Au plaisir de vous lire
Claude
Petite modif pour entrer une profondeur ne correspondant pas à une valeur du tableau :
http://cjoint.com/?gAjSKD2SEX
AV
Bonjour,
Jette un oeil dans "insertion | nom | définir".
@+
FxM
Boonsoir
Encore merci de vos contributions qui fonctionnent bien sur l'exemple
en retranscrivant vos formules avec la table de plongée complète, cela ne
fonctionne que jusqu'à la ligne 27
Question: N'y-a-t-il pas une limite de nombre de ligne ?
la table complète comporte 110 lignes + 1 d'entêtes = total 111
Au plaisir de vous lire
Claude
Petite modif pour entrer une profondeur ne correspondant pas à une valeur du
tableau :
