Hirdetés

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

  • 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

Hirdetés