OPRAVA ... soubor v zip a samozřejmě buňka (ne bubka) a excel 2010 (ne exc210).
Díky.
L.
Díky.
L.
Příloha: 
31112_podminene_formatovani.zip (9kB, staženo 22x)
citovat31112_podminene_formatovani.zip (9kB, staženo 22x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Podminene kopirovani bubky v EXC 210
MS Excel
Téma: Podminene kopirovani bubky v EXC 210 
Zaslal/a ADR-team 12.4.2016 21:02
Ahoj, prosím o pomoc...
potřebuji vyplňovat do zeleného políčka (b3) datum a žlutého (c3)číslo. Výsledek vzorce z modré oblasti (c6-c24) by měl být zkopírování hodnoty ze žlutého políčka do příslušného řádku s odpovídajícím datumem. Jednoduchá fce KDYŽ mi nefunguje správně. Hodnota se objeví pouze u konkrétního datumu a ty předchozí zmizí...
Poradíte mi?
Díky
Láďa
Příloha: 
31111_podminene_formatovani.txt (1kB, staženo 22x)
31111_podminene_formatovani.txt (1kB, staženo 22x)Toto veru bez makra nepôjde. Takže takto.
Příloha: 31113_vypln-podla-datumu.zip (15kB, staženo 22x)
citovat31113_vypln-podla-datumu.zip (15kB, staženo 22x)elninoslov - jsi borec, díky. Jen musím zjistit jak na to. Jak to v tom souboru najdu, jak jsi to udělal? Jdu se podívat, jak na makra.citovat
Elninoslov - už jsem to našel. Prosím o krátký popis, co ten program na jednotlivých řádcích dělá, prosím.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Cells(3, 3)) Is Nothing Then
Dim R As Long
On Error Resume Next
R = WorksheetFunction.Match(CDbl(Cells(3, 2)), Cells(6, 2).Resize(19), 0)
If Err = 0 Then Cells(5 + R, 3).Value = Cells(3, 3) Else Err.Clear
End If
End Sub
Díky.citovat
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Cells(3, 3)) Is Nothing Then
Dim R As Long
On Error Resume Next
R = WorksheetFunction.Match(CDbl(Cells(3, 2)), Cells(6, 2).Resize(19), 0)
If Err = 0 Then Cells(5 + R, 3).Value = Cells(3, 3) Else Err.Clear
End If
End Sub
Díky.citovat
POMOC!
Ahoj, tak jsem několik hodin zapasil s makry a nic, jen mam na sebe zlost. Když budes mit chut to vyresit, tak ti budu velmi vdecny. Podivej se prosim do prilozeneho souboru.
Logika zadani je : Nejdrive upravim datum, potom doplnim hodnoty (zlute, ty se sečtou do cerveneho radku a odtud se podle datumu zkopiruji.
Jde to také vyresit makrem? Viz prilozeny soubor.
Diky!!!
Ahoj, tak jsem několik hodin zapasil s makry a nic, jen mam na sebe zlost. Když budes mit chut to vyresit, tak ti budu velmi vdecny. Podivej se prosim do prilozeneho souboru.
Logika zadani je : Nejdrive upravim datum, potom doplnim hodnoty (zlute, ty se sečtou do cerveneho radku a odtud se podle datumu zkopiruji.
Jde to také vyresit makrem? Viz prilozeny soubor.
Diky!!!
Příloha: 31124_podminene-kopirovani-vice-bunek.zip (18kB, staženo 22x)
citovat31124_podminene-kopirovani-vice-bunek.zip (18kB, staženo 22x)Tak skúste toto, na viac nemám čas.
Příloha: 31130_podminene-kopirovani-vice-bunek.zip (22kB, staženo 22x)
citovat31130_podminene-kopirovani-vice-bunek.zip (22kB, staženo 22x)
Uživatelské menu
Nejste přihlášen(a)
\n
\nMenu
Formulář Faktura
Formulář Faktura IV
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Helios iNuvio
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.
RSS nejnovější články