Recuperation d'un tableau sur Internet

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

paul87

XLDnaute Impliqué
Bonjour,
Je souhaite récuperer un tableau trouvé sur Internet et l'exporter vers Excel, en conservant toutes les fonctions de calcul
Je precise qu'il ne s'agit pas d'un outil protégé par un copyright
Mais comment dois-je faire pour conserver à la fois la mise en forme et le fonctionnement...???
Après plusieurs essais....rien de concluant...
Merci de vos conseils.
 
Re : Recuperation d'un tableau sur Internet

Bonsoir le Forum, les Gens, Paul,

Si tu nous disais avec quoi ce tableau a été conçu à l'origine ? (fournis nous l'extension du fichier si tu ne connais pas le programme)

Peut être qu'ainsi on saura quoi....


A te lire


Sam
 
Re : Recuperation d'un tableau sur Internet

Re : en affichant la source j'ai trouvé ça :
PHP:
<SCRIPT>function CalcTEMP(form) {
form.ztemp.value = form.temp[form.temp.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcPAM(form) {
form.zpam.value = form.pam[form.pam.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcFC(form) {
form.zfc.value = form.fc[form.fc.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcFR(form) {
form.zfr.value = form.fr[form.fr.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcAA(form) {
form.zaa.value = form.aa[form.aa.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcPAO(form) {
form.zpao.value = form.pao[form.pao.selectedIndex].value
form.zapa.value= CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcHCO(form) {
form.zhco.value = form.hco[form.hco.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcPH(form) {
form.zph.value = form.ph[form.ph.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcNA(form) {
form.zna.value = form.na[form.na.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcKA(form) {
form.zka.value = form.ka[form.ka.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcUREE(form) {
form.zuree.value = form.uree[form.uree.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcUREA(form) {
form.zurea.value = form.urea[form.urea.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcHC(form) {
form.zhc.value = form.hc[form.hc.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcGB(form) {
form.zgb.value = form.gb[form.gb.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcAGE(form) {
form.zage.value = form.age[form.age.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcGLAS(form) {
form.zglas.value = form.glas[form.glas.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcMCRO(form) {
form.zmcro.value = form.mcro[form.mcro.selectedIndex].value
form.zapa.value = CalcAPA(form)
form.zmort.value = CalcMort(form)
form.zmorta.value = CalcMorta(form)
}
function CalcAPA(form) {
z =eval(form.ztemp.value)
z = z + eval(form.zpam.value)
z = z + eval(form.zfc.value)
z = z + eval(form.zfr.value)
z = z + eval(form.zaa.value)
z = z + eval(form.zpao.value)
z = z + eval(form.zhco.value)
z = z + eval(form.zph.value)
z = z + eval(form.zna.value)
z = z + eval(form.zka.value)
z = z + eval(form.zuree.value)
z = z + eval(form.zurea.value)
z = z + eval(form.zhc.value)
z = z + eval(form.zgb.value)
z = z + eval(form.zage.value)
z = z + eval(form.zglas.value)
z = z + eval(form.zmcro.value)
if (form.zuree.value>0 && form.zurea.value>0) {alert("Insuffisance renale aigue ou non ?")}
if (form.zph.value>0 && form.zhco.value>0) {alert(" Serum HCO3: n'utiliser que si le pH est indisponible")}
if (form.zaa.value>0 && form.zpao.value>0) {alert(" FIO2 > ou< 0.5 ?")}
return ''+z
}
function CalcMort(form) {
z = eval(form.zapa.value)
z = -3.517 + z * (0.146)
z = Math.exp(z) / (1 + Math.exp(z))
z = Fmt(100 * z) + " %"
return z
}
function CalcMorta(form) {
z = eval(form.zapa.value)
z = -3.517 + (z * (0.146))
z = eval(form.y.value + "+z")
z = Math.exp(z) / (1 + Math.exp(z))
z = Fmt(100 * z) + " %"
form.zmorta.value = z
return z
}
function Fmt(x) { 
var v
if(x>=0) { v=''+(x+0.05) } else { v=''+(x-0.05) }
return v.substring(0,v.indexOf('.')+2)
}</SCRIPT>

Et un peu plus loin :
PHP:
<SCRIPT LANGUAGE=JavaScript><!--
function clearInput(form) 
{
form.paco2.value="";
form.pao2.value="";
form.pkaco2.value="";
form.pkao2.value="";
form.fio2.value="";
form.fkio2.value="";
form.paa.value="";
form.kaa.value="";
}
function calcule(form){
 
 
form.paa.value=(760-47)*(form.fio2.value)-(form.paco2.value)-(form.pao2.value);
form.kaa.value=(100-6.2)*(form.fkio2.value)-(form.pkaco2.value)-(form.pkao2.value);
form.paa.value=form.paa.value.substring(0,3);
form.kaa.value=form.kaa.value.substring(0,3);
}
//--></SCRIPT>

Puis encore :
PHP:
<SCRIPT LANGUAGE=JavaScript>num1 = 0 ; num2 = 0 ; num3 = 0;   ; function calcul() { chaine = " " ;  num = num1+num2+num3;  document.glasgow.res.value = num ;  }</SCRIPT>

Peut être que nos vbaistes vont savoir traduire ça pour l'inclure dans une macro

Perso pour moi c'est pire que du chinois croisé d'hébreu😛

A te lire


Sam
 
Dernière édition:
Re : Recuperation d'un tableau sur Internet

Bonjour le fil,

Pas sûre d'avoir compris

Menu Données / Données externes / Nouvelle requête sur le web

Tu mets l'URL en haut à gauche
puis tu sélectionnes (ca affiche un tick english) ce que tu veux garder
ensuite cliquer sur importer
 
Re : Recuperation d'un tableau sur Internet

Bonjour le Forum, les Gens, Paul, Nat,

Je ne connaissais pas cette importation de données Nat, très intéressant mais elle ne permet pas la copie de la feuille HTML avec le code javascript et les menus déroulants associés cela importe juste les données en fait uniquement ce qui est affiché sur la page IE au moment de l'import...

A mon sens une traduction en VBA du code javascript est la seule solution et là je passe la main car il est de notoriété publique que je ne suis pas VBAiste pour 2 cents d'euros 😉

A vous lire


Sam
 
Re : Recuperation d'un tableau sur Internet

Bonjour le fil

Je veux également importer des données d'internet (un tableau) mais il y a certaines colonnes et lignes que je ne veux pas.

Est ce qu'il est possible à l'actualisation toutes les 5 minutes de lui dire que l'on ne veut pas ce qu'il importe dans la colonne D et aussi les mots "Excel"...

exemple: si C5="racecourse" alors "Excel" est supprimé

Merci pour votre aide 😀
 
Dernière édition:
Re : Recuperation d'un tableau sur Internet

Bonjour et Merci a vous tous...!!
ta version en fichier joint..me parait etre celle qui conviendra le mieux..!!
mais alors quel boulot pour moi...!!! l'autre m'a l'air trop compliquée..
...mais l'une comme l'autre, je n'y comprends pas grand chose..!!!
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
12
Affichages
1 K
Retour