Citat:
intelekt: - ako npr. u sheetu 2 imam robu iz magacina Beograd, da mi se naziv sheeta 2 promeni u Beograd, a u sh. 3 Novi Sad, ako je iz tog magacina. Ako ih nema, onda nista.
Probaj sa ovim kodom ( btw: ne pišem VBA ali sam malo za tebe proguglao
Uzmimo za primjer da ti je ćelija A1 ona u kojoj se nalaze imena po kojima hoćeš nazvati Sheet
Za pojedini Sheet, kopira se u dotični Sheet
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
ActiveSheet.Name = [A1]
End If
End Sub
Za sve Sheets u Woorkbook ( kopira se u ThisWorkbook )
Code:
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$A$1" Then
ActiveSheet.Name = [A1]
End If
End Sub
1. Otvori file i sa ALT+F11 otvori VBA editor
2. Klkini dvoklik na ThisWorkbook i Copy/Paste drugi kod u desnom dijelu editora
3. Izađi iz VBA editora i snimi
4. Otvori ponovno snimljeni file
5. Prihvati Makronaredbe
6. Upiši u ćeliju A1 naziv po želji + Enter
Jednini problem je što ne možeš ćeliju ostaviti praznu, mora biti neki podatak ( nemoj koristiti specijalne znakove )
Nadam se da sam ti malo pomogao oko prvog dijela pitanja
BTW: Vidi Attach