VBA blocage showdetail

erissato -  
melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai un programme qui va chercher sur un autre classeur des cases sur lesquelles il double clique pour afficher le détail, le problème c'est qu'il existe sur le classeurs des cases qui ne comportent pas de détail et c'est là que mon programme bloque, ce que je voudrais c'est qu'il continue sa recherche même s'il ne trouve pas de détail:

If cell = maDonnee Then
reponse = MsgBox(" BODER =" & cell.Offset(-1, 1) & " BODF =" & cell.Offset(-1, 2) & " ,Voulez-vous continuer?", vbOKCancel, "Validation")

i = cell.Row
i = i - 1
ref = "B" & i
Sheets(onglet).Select
Sheets(onglet).Range(ref).Select
Selection.ShowDetail = True
Sheets(onglet).Select
Sheets(onglet).Range("C" & i).Select
Selection.ShowDetail = True


j = j + 2

trouve = True

End If
Next

Le blocage se fait sur cette ligne:

Selection.ShowDetail = True

Merci pour votre aide


1 réponse

melanie1324 Messages postés 1504 Date d'inscription   Statut Membre Dernière intervention   155
 
bonjour,

essaie ca :

If cell = maDonnee Then
reponse = MsgBox(" BODER =" & cell.Offset(-1, 1) & " BODF =" & cell.Offset(-1, 2) & " ,Voulez-vous continuer?", vbOKCancel, "Validation")

i = cell.Row
i = i - 1
ref = "B" & i
Sheets(onglet).Select
Sheets(onglet).Range(ref).Select
Selection.ShowDetail = True
Sheets(onglet).Select

if Sheets(onglet).Range("C" & i) <> "" then
Sheets(onglet).Range("C" & i).Select
Selection.ShowDetail = True
end if

j = j + 2

trouve = True

End If
Next
0