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

Příspěvky uživatele

A nebo si pro každý sloupec zvol jinné formátování. Bez přílohy se to těžko řeší.

Možná by bylo lepší hodit přílohu.

A když změníš

toto

.NumberFormat = "@"

na toto

.NumberFormat = "# ##0,00"

=SUMIFS($C$3:$C$703;$B$3:$B$703;">="&DATUM(2022;3;1);$B$3:$B$703;"<="&DATUM(2022;3;31))

Private Sub Worksheet_Change(ByVal Target As Range)

Dim KeyCells As Range
Set KeyCells = Range("A1")

If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then
If Range("C1").Value - Range("B1").Value < 0 Then
Range("C1").Value = 0
Else
Range("C1").Value = Range("C1").Value - Range("B1").Value
End If
End If

End Sub

nevím co se má stát s výsledkem, tak jsem ho šoupl do buňky D1

Je to jen tak narychlo.

Private Sub Worksheet_Change(ByVal Target As Range)

Dim KeyCells As Range
Set KeyCells = Range("A1")

If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then
If Range("B1").Value - Range("C1").Value < 0 Then
Range("D1").Value = 0
Else
Range("D1").Value = Range("B1").Value - Range("C1").Value
End If
End If

End Sub

Vložit do Modulu listu.

Rád bych ti pomohl, ale já nic lepšího nevymyslím.

Zkusím něco vymyslet.

Ručně, protože vy nemáte stejné názvy produktů na první a druhém listě.

Tak?

Nějak se v tom popisu ztrácím.

Nevadí udělám si vzor sám.

A co takhle vložit vzor, abychom věděli co kam chceš kopírovat.

Tak?

Však to už je jen na zvoleném formátu.

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje