Comment faire pour soustraire...

K

kjin

XLDnaute Barbatruc

• 21 Décembre 2013

• #2

Re : Comment faire pour soustraire...

bonsoir,
En h8

Code:

$G8-CNUM(STXT(SUBSTITUE($H8;".";",");1;NBCAR($H8)-3))

A+
kjin

 

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 21 Décembre 2013

• #3

Re : Comment faire pour soustraire...

Bonjour Kjin et le forum

Merci pour ta reponse

Mais ,je pense qu'il manque quelques chose?????

Peux tu regarder merci

un = oui ,mais je ne connait pas les signe ou lettres qui manque

Merci

Guido

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Décembre 2013

• #4

Re : Comment faire pour soustraire...

Bonjour à tous,

Quel est ton séparateur décimal ?

A+ à tous

 

Pièces jointes

• JC Soustraire.xls

  124.5 KB · Affichages: 33

Dernière édition: 21 Décembre 2013

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 21 Décembre 2013

• #5

Re : Comment faire pour soustraire...

Ré

Bonjour JCGL

Je fait un telechargement sur le net...

et le resultat c'est la page du fichier.

Je constate que dans la colonne cotes du matin ,il y a des virgulles et dans l'autre des points..

merci

Guido

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 21 Décembre 2013

• #6

Re : Comment faire pour soustraire...

Bonsour®
en général pour éviter les problèmes MiMo (M%*?# In ==> M%*?# Out)
traiter les problèmes à la source !!!

dans la proc get_cotes :

For J = 3 To 4 'maTable.Rows(I - 1).Cells.Length
' ***********************************
'-------oter les caractères insécable, les espaces superflus, convertir en format double
.Cells(Lig, J + 4) = CDbl(Application.Substitute(Application.Substitute(Trim(maTable.Rows(I - 1).Cells(J - 1).innerText), ".", ","), Chr(160), ""))
' ***********************************
Next J

Cliquez pour agrandir...

 

Pièces jointes

• Reunions ZETurf.xls

  304.5 KB · Affichages: 47

Dernière édition: 21 Décembre 2013

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Décembre 2013

• #7

Re : Comment faire pour soustraire...

Bonjour à tous,

Peux-tu essayer cette formule :

Code:

=SI(ESTERREUR(SI(ESTNUM(G8);$G8-CNUM(STXT(SUBSTITUE($H8;",";".");1;NBCAR($H8)-3));""));
SI(ESTNUM(G8);$G8-CNUM(STXT(SUBSTITUE($H8;".";",");1;NBCAR($H8)-3));"");
SI(ESTNUM(G8);$G8-CNUM(STXT(SUBSTITUE($H8;",";".");1;NBCAR($H8)-3));""))

A+ à tous

 

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 21 Décembre 2013

• #8

Re : Comment faire pour soustraire...

Ré

J'ai essayé ta formule,mais un message d'erreur se fige sur l'ecran...

Voici la feuille complete ,je te remercie d'avance

Guido

 

Pièces jointes

• COTES POUR GUIDO.xls

  245 KB · Affichages: 35

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 21 Décembre 2013

• #9

Re : Comment faire pour soustraire...

Re

Je m'excuse JCGL, ta solution fonctionne ,j'avais oublié de modiffier la referances des celulles

Merci

amitiés

Guido

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 21 Décembre 2013

• #10

Re : Comment faire pour soustraire...

Bonjour à tous,

Cela fonctionne chez moi.

A+ à tous

 

Pièces jointes

• JC COTES POUR GUIDO.xls

  304.5 KB · Affichages: 44

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 21 Décembre 2013

• #11

Re : Comment faire pour soustraire...

Ré

oui,mon message s'est croisé JCGL

Merci

Guido

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 21 Décembre 2013

• #12

Re : Comment faire pour soustraire...

Bonsour®
voir là :
https://www.excel-downloads.com/threads/comment-faire-pour-soustraire.214818/


nb :
😕
je ne vois pas d'où proviennent les Ding... Ding... ?

 

Pièces jointes

• cotes pour guido.xls

  277.5 KB · Affichages: 44

Dernière édition: 21 Décembre 2013

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 25 Décembre 2013

• #13

Re : Comment faire pour soustraire...

Bonjour

Le fichier bloke est je ne sais pas comment faire

merci de voir cette erreur...

For Each Cel In Range("B6:B15")
If Not IsEmpty(Cel) Then
Application.StatusBar = "Étape 1 sur 3 - Extraction de la réunion " & Cel.Value
IE.navigate URL_Adr & Cel.Offset(, -1).Value
.............................................................................................................................................................

Do While IE.Busy Or IE.readyState <> READYSTATE_COMPLETE " bloc avec cette phrase "

.........................................................................................................................................................................



DoEvents
Loop

merci

Guido

 

Vote positif 0 Vote négatif

Modeste geedee

XLDnaute Barbatruc

• 26 Décembre 2013

• #14

Re : Comment faire pour soustraire...

Bonsour®

probablement un problême de mise à jour du site...
ou cote non renseignée (non partant ??)

j'ai ajouté une petite gestion d'erreur, quelques liens hypertexte pour la navigation 😎

 

Pièces jointes

• cotes-pour-guido.xls

  295.5 KB · Affichages: 56

Vote positif 0 Vote négatif

Guido

XLDnaute Accro

• 26 Décembre 2013

• #15

Re : Comment faire pour soustraire...

Bonjour

Je te remercie ,je vais regarder.

a plus

Guido

 

Vote positif 0 Vote négatif