EXCEL

Résolu
hassaine
Messages postés
23
Date d'inscription
samedi 12 avril 2003
Statut
Membre
Dernière intervention
18 mai 2009
- 7 juin 2007 à 19:16
benmak99
Messages postés
3
Date d'inscription
mardi 28 août 2007
Statut
Membre
Dernière intervention
26 mars 2010
- 16 avril 2008 à 23:13
Bonjour, j'ai une table sous forme d'excel (IRG.XLS) je voudrais bien reprendre cette table en (IRG.DB "paradox") a fin d'éviter de reprendre toute la saisie écrite et aussi d'avoir des connaissances en + sur delphi
MERCI

2 réponses

hassaine
Messages postés
23
Date d'inscription
samedi 12 avril 2003
Statut
Membre
Dernière intervention
18 mai 2009

7 juin 2007 à 22:41
merci dominique.stock
c gnetil de votre part de me rappeler la fonction recherche
0
benmak99
Messages postés
3
Date d'inscription
mardi 28 août 2007
Statut
Membre
Dernière intervention
26 mars 2010

16 avril 2008 à 23:13
Function irg(sal_imp As Long) As Currency
'
' Macro1 Macro
'
If sal_imp <= 15000 Then
irg = 0#
ElseIf sal_imp <= 22500 Then
irg = (sal_imp - 15000) * 0.2
ElseIf sal_imp <= 28750 Then
irg = 1500 + (sal_imp - 22500 + ((sal_imp - 22500) \ 5)) / 10
ElseIf sal_imp <= 30000 Then
irg = 2250 + (sal_imp - 28750) * 0.2
Else
irg = 2500 + (sal_imp - 30000) * 0.3
End If


'
End Function
0