Új hozzászólás Aktív témák

• #17057 m.zmrzlina senior tag

  Új Válasz 2013-03-03 14:07:37 #17057

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  m.zmrzlina

  senior tag

  Van egy ilyen makrórészlet:

  For intI = Worksheets.Count To 1 Step -1
  If Worksheets(intI).Name <> "összesítő" Then
  If Worksheets(intI).Range("B1").Value = "valami" Then
  Worksheets(intI).Name = Int(Worksheets(intI).Range("B10").Value)
  Else
  Application.DisplayAlerts = False
  Worksheets(intI).Delete
  Application.DisplayAlerts = True
  End If
  End If
  Next

  Az a bajom vele, hogy ha két munkalapon a B10-es cella (egészrésze) megegyezik akkor (várakozásom szerint) annak kellene történnie, hogy a makró az első munkalapot átnevezi a másiknál pedig hibára fut mivel már van egy olyan nevű munkalap amire az aktuálisat nevezni kellene. (ezt a második munkalapot egyébként törölni szeretném a későbbiekben)

  Ezzel szemben az történik, hogy hibaüzenet nélkül végigfut a makró és a második munkalapnak meghagyja az eredeti nevét.

  Miért van az hogy nem fut hibára a makró az átnevezésnél és hogyan lehet legegyszerűbben detektálni a névütközést?

  (ellenőriztem: nincsen "úgymaradt" Application.DisplayAlerts = False parancs sehol a kódban korábban.)

Új hozzászólás Aktív témák