Sub CylindersNameUpdate()

Dim tag1

Dim tag2

Dim i

For i = 1 To 5

tag1 = SmartTags("DB09_Cylinders_Y" & i & "_Name")

Next

End Sub

 I don't know why it doesn't work, because when I'm writting each line separately like this

tag1 = SmartTags("DB09_Cylinders_Y1_Name") 

tag1 = SmartTags("DB09_Cylinders_Y2_Name")

tag1 = SmartTags("DB09_Cylinders_Y3_Name")

it is enough to update tag

I have WinCC Advanced v15.1, TP700 Comfort

Thanks for help

Joanna