PC-HELP.CZ

Ahoj,

mám makro:

sub LOGO()
Select Case Range("U6").Value
        Case "Picture 1": ShowPicture ("Picture 1")
        Case "Picture 2": ShowPicture ("Picture 2")
        Case "Picture 3": ShowPicture ("Picture 3")
        Case "Picture 4": ShowPicture ("Picture 4")
    End Select
End Sub

Sub ShowPicture(picname As String)
    On Error Resume Next
    Sheets("Titulní_list").Shapes("Picture 1").Delete
    Sheets("Titulní_list").Shapes("Picture 2").Delete
    Sheets("Titulní_list").Shapes("Picture 3").Delete
    Sheets("Titulní_list").Shapes("Picture 4").Delete
    On Error GoTo 0

    Sheets("Pom. Výp.").Shapes(picname).Copy
    Sheets("Titulní_list").Range("G10").Select

    Sheets("Titulní_list").Paste
End Sub

které mi při změně firmy v buňce vrátí logo společnosti (obrázek).

Jenže se spustí pomocí tlačítka, což nechci. Jsem amatér co se týká VBA, a proto nevím, jak nastavit makro aby se spouštělo se změnou v dané buňce :(

Prosim o radu.

díky Tom

Toto makro vlož do příslušného listu

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Address(False, False) = "B2" Then
    Application.EnableEvents = False
     Call LOGO
    Application.EnableEvents = True
  End If
End Sub

Díky za rychlou odpověď, ale já mám trochu komplikovanější problém co na to koukám.

Používám, již zavedený excel se zaheslovanýma makrama tudíž musím používat personální makra. Nemůžu tedy vkládat do listů makra. Když sem dal to co si psal do modulu, tak to zahlásilo : Sub or Function not defined :(

--- Doplnění předchozího příspěvku (07 Srp 2014 15:27) ---

A taky jsem zjistil, že já vlastně buňku neměním, ale jelikož se odkazuje na jinou, tak se vlastně jen přepočítá :(

Tam je nějaký to worksheet_calculate, ale s tim taky neumim

:(

Vyřešil jsem sám.,přes funkci worksheet.change.,měl jsem špatně range :(

PC-HELP.CZ

EXCEL - spuštění makra při změně hodnoty v buňce

EXCEL - spuštění makra při změně hodnoty v buňce

Re: EXCEL - spuštění makra při změně hodnoty v buňce

Re: EXCEL - spuštění makra při změně hodnoty v buňce

Re: EXCEL - spuštění makra při změně hodnoty v buňce Vyřešeno