• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Fórum

Příspěvky uživatele

ďakujem pekne, pomohlo

Zdravím Vás,

Potreboval by som pomôcť. Potrebujem podľa výberu skopírovať riadok do druhého listu. Aby sa po kliknutí na meno skopíroval príslušní riadok do listu odoslať a pôvodný sa zmazal.. ďalšie označené vždy pod seba.

Vopred dík za pomoc

Zdravím potreboval by som poradiť, mám súbor s normami na čas. V jednotlivých listoch sú uložene časy podla počtu dielcov. Potreboval by som vyhľadať pri zadaní :

1. Počet dielcov
2. Hrubka
3. H - hmotnost

Ďakujem za pomoc

Dík ale nechcem ich spočítať, potrebujem priradiť k osobnému číslu a typu zrážky hodnotu (sumu)

"Sumár" V stĺpci A sú uvedené osobné čísla zamestnancov. V stĺpci D sú uvedené dva typy zrážok. Potreboval by som do stĺpca E doplniť sumu z hárku vstup kde sú k jednotlivým osobným číslam a typom zrážok pridelené sumy.

ďik za pomoc.

Uz som na to prisiel.. Ale dik za ochotu.

Myslel som nejak podobne ako je tento kod : Ja potrebujem len nulky a nie vyhodnotit ale zmazat riadok.

Public Sub kontrola()

Dim rd As Single

Dim sl As Single

Dim jmeno As String

rd = 5 ' první řádek

sl = 2 ' první sloupec

Do While Cells(rd, sl + 1) <> "" Or Cells(rd + 1, sl + 1) <> ""

If Cells(rd, sl) <> "" Then jmeno = Cells(rd, sl)

If Cells(rd, sl + 1) <> "" Then

If Left(Cells(rd, sl + 1), Len(jmeno)) = jmeno Then Cells(rd, sl + 2) = "OK" Else Cells(rd, sl + 2) = "NOK"

End If



rd = rd + 1

Loop

End Sub

Ahoj,

Potrebujem poradit. V prilohe je subor o troch stlpcoch. Potrebujem porovnat hodnoty v stlpci A a B v prislusnom riadku. Ak su rovne nule zmaz dany riadok. Snad som sa vymackol dobre.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$D$4" And Len(Target) > 0 Then
Call XY
End If
End Sub

Makro sa spusti po zmene v bunke D4

Alebo takto. Ja osobne by som 4 volbu zrusil a do riadku by som dal vzorecek na zlucenie dvoch buniek =(A1)&""&(B1). ponechal len 3 volby dat,Auto a pocet lidi.

Nejak takto ? Ak je nieco spatne, popis strucnejsie.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Formulář Faktura

Helios iNuvio

On-line nástroje