Може ли някой да помогне?
Да обясня какво прави този код!
- На лист1 съм поставила бутон, който извиква форма на която съм поставила listbox1, който се запълва със записи от лист2 и на същата форма също така още един бутон , който изтрива посочения запис едновременно от listbox1 и от лист2.
Всичко това сработва, само ако предварително е активен лист2, но ако е активен друг лист то той не не сработва.
Въпроса ми е, как да направя така, че независимо кой лист е активен кода да работи? Ето го кода!

If MsgBox("Сигурни ли сте че желаете изтриване на отбелязаният запис?", vbYesNo, "Внимание - операция изтриване!") = vbYes Then
For j = 14 To 80
Izbranslujitel = ListBox1.Value
If Cells("B" & j) = Izbranslujitel Then
NomerRed = Range("B" & j).Row
Rows(NomerRed).Delete
End If
Next
ZarediListBox
End If

Точна версия на Excel?

Преди между IF и FOR сложи един ред, на който активираш втория лист и готово!

Версията на ексел е 2003

Варианта с активиране на лист2 съм го отработила , но не ме устройва, поради това, че листовете са повече, а бутона от който извиквам listbox1 съм го поставила на тулбара... та когато го извиквам от примерно лист3 трябва да активирам лист2 и после да се върна на лист3, от където всъшност съм извикала listbox1... А ако са повече листата? За това идеята ми е като натисна бутона да не се съобразявам на кой лист се намирам.

Еми тогава, навсякъде където ползваш адресиране към клетка (в текущата страница), сложи едно Sheets("лист2").
напр.
вместо
cells(1,1).value
може да се ползва
sheets(list1).cells(1,1).value
(е, при тебе буквите са други)

Сорка че съ сбъркала към кого е поста. И един съвет: Когато питаш за нещо из форумите, е най-добре подробно да опишеш и какво си пробвала. По този начин ще спестиш куп варианти, вече тествани...