Pb Ole excel

Signaler
Messages postés
27
Date d'inscription
samedi 13 mars 2004
Statut
Membre
Dernière intervention
21 mai 2008
-
Messages postés
1154
Date d'inscription
samedi 14 août 2004
Statut
Membre
Dernière intervention
5 avril 2012
-
Bonjour à tous,
je vous ecris car j'ai un pb  quand je fais  workbook.worksheet.item[nomPage].activate ça  ne marche pas,  delphi me dit  "Index introuvable car il ne trouve pas la page(nomPage)".
comment je peux faire pour palier au pb et comment faire pour verifier si une page existe.

c moi

1 réponse

Messages postés
1154
Date d'inscription
samedi 14 août 2004
Statut
Membre
Dernière intervention
5 avril 2012
2
Bonjour,

Une fonction rapide, non testée, et à améliorer, mais le principe est là :













function WorksheetExists( Wb : variant ; WsName : string ) :
// Wb = WorkBook
// WsName = Nom du WorkSheet
boolean ;
var
  i : integer;
begin
  Result := false ;
  for i:=0 to Wb.WorkSheets.Count-1 do
  begin    Result :( Wb.WorkSheets[i].Name WsName ) ;
    if Result then Exit ;
  end ;
end ;




Cordialement.
<hr />"L'imagination est plus importante que le savoir." Albert Einstein