Elektroda.pl
Elektroda.pl
X

Search our partners

Find the latest content on electronic components. Datasheets.com
Elektroda.pl
Please add exception to AdBlock for elektroda.pl.
If you watch the ads, you support portal and users.

[Excel][VBA] Sprawdzanie czy skoroszyt jest otwarty

13 Mar 2010 20:36 4779 2
  • Level 2  
    Witam,

    Potrzebuje pomocy w kwestii zwiazanej z otwieraniem nowych skoroszytow w Excelu przy uzyciu kodu VBA.
    Wiem jak mozna otworzyc skoroszyt. Problem w tym, ze nie wiem w jaki sposob mozna sprawdzic czy dany skoroszyt jest juz otwarty (zeby go nie otwierac ponownie). Czy ktos moze mi pomoc? Z gory dziekuje :)
  • Moderator of Programming
    Sposobów jest wiele. Ten należy do moich ulubionych :)
    Code:
    Sub sprawdz()
    
    Dim a
    On Error Resume Next
    a = Workbooks("Plik.xls").Sheets(1).Range("A1")
    If Err = 9 Then
      'tu procedura otwarcia pliku
      'jeśli plik jest otwarty ten blok zostanie pominięty
      MsgBox "otwieramy"
    End If
    On Error GoTo 0
    'procedury ciąg dalszy

    End Sub
  • Level 2  
    Wielkie dzieki adamas_nt.
    Zaraz wyprobuje i dam znac :)