2- contrôler les doublons par une requête If DCount("corr_nom", "requête3") > 0 Then MsgBox "il y a des doublons" Exit Sub End If sql de la requête: SELECT table1.Lenom FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1", "fichierexcel.xls", True
en espérant ne rien avoir oublié. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"MAGALIE" a écrit dans le message de news:1ce1001c422e7$09696b70$
Re bonjour
Lorsque j'importe des données excel et qu'il y a des doublons Acces ne me fais pas de rapport d'erreur !
Manque t'il une option ?
Mille merci à tous ces chefs Access Mag
Bonjour magalie.
il n'y a pas d'options à ma connaissance. Il faut gérer toi-même la
situation:
2- contrôler les doublons par une requête
If DCount("corr_nom", "requête3") > 0 Then
MsgBox "il y a des doublons"
Exit Sub
End If
sql de la requête:
SELECT table1.Lenom
FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1",
"fichierexcel.xls", True
en espérant ne rien avoir oublié.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"MAGALIE" <FORMATION@RCLENS.fr> a écrit dans le message de
news:1ce1001c422e7$09696b70$a301280a@phx.gbl...
Re bonjour
Lorsque j'importe des données excel et qu'il y a des
doublons Acces ne me fais pas de rapport d'erreur !
2- contrôler les doublons par une requête If DCount("corr_nom", "requête3") > 0 Then MsgBox "il y a des doublons" Exit Sub End If sql de la requête: SELECT table1.Lenom FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1", "fichierexcel.xls", True
en espérant ne rien avoir oublié. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"MAGALIE" a écrit dans le message de news:1ce1001c422e7$09696b70$
Re bonjour
Lorsque j'importe des données excel et qu'il y a des doublons Acces ne me fais pas de rapport d'erreur !
Manque t'il une option ?
Mille merci à tous ces chefs Access Mag
Raymond [mvp]
.../... Lire
If DCount("Lenom ", "requête3") > 0 Then au lieu de :
If DCount("corr_nom", "requête3") > 0 Then excuses.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Raymond [mvp]" a écrit dans le message de news:
Bonjour magalie.
il n'y a pas d'options à ma connaissance. Il faut gérer toi-même la situation:
2- contrôler les doublons par une requête If DCount("corr_nom", "requête3") > 0 Then MsgBox "il y a des doublons" Exit Sub End If sql de la requête: SELECT table1.Lenom FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1", "fichierexcel.xls", True
en espérant ne rien avoir oublié.
.../...
Lire
If DCount("Lenom ", "requête3") > 0 Then
au lieu de :
If DCount("corr_nom", "requête3") > 0 Then
excuses.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:eJalU9uIEHA.3220@TK2MSFTNGP12.phx.gbl...
Bonjour magalie.
il n'y a pas d'options à ma connaissance. Il faut gérer toi-même la
situation:
2- contrôler les doublons par une requête
If DCount("corr_nom", "requête3") > 0 Then
MsgBox "il y a des doublons"
Exit Sub
End If
sql de la requête:
SELECT table1.Lenom
FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1",
"fichierexcel.xls", True
2- contrôler les doublons par une requête If DCount("corr_nom", "requête3") > 0 Then MsgBox "il y a des doublons" Exit Sub End If sql de la requête: SELECT table1.Lenom FROM table1 INNER JOIN Tablex ON table1.Lenom = Tablex.Lenom;
3- importer le fichier si pas de doublons DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, "table1", "fichierexcel.xls", True
