PC-HELP.CZ

Dobrý den,

potřeboval bych jestli je možné makro pro excel kdy:

- do aktuálního vybraného řádku, který vyberu (ne do nového řádku) se
- do určitého sloupce (N) se vepíše předurčený text
- následně do sloupce (P) se vloží aktuální datum
- a poté se do sloupce (T) vepíše předurčený text

Předem díky za odpověď/radu.

A čím má byť to makro spúšťané ?

Kód: Vybrat vše

Sub Dopln()
Dim Oblast As Range
    If TypeName(Selection) <> "Range" Then MsgBox "Nieje je vybraná oblasť", vbCritical: Exit Sub
    
    Application.ScreenUpdating = False
    Set Oblast = Selection.EntireRow
    Intersect(Oblast, Columns("N")).Value = "předurčený text N"
    Intersect(Oblast, Columns("P")).Value = Date
    Intersect(Oblast, Columns("T")).Value = "předurčený text T"
    Application.ScreenUpdating = True
End Sub

jo to jsem zapomněl...tlačítkem

Kód si vložte do modulu daného listu (Alt+F11), na list pridajte tlačítko (karta Vývojár), a tlačítku priraďte toto makro.

Super díky moc, funguje výborně :thumbup:

PC-HELP.CZ

makro excel

makro excel Vyřešeno

Re: makro excel

Re: makro excel

Re: makro excel

Re: makro excel