Stránka 1 z 1

Doplnění hodnot

Napsal: 08 lis 2015 21:24
od p.bublik
Ahoj,
poradí prosím někdo jak doplnit hodnoty do prazdných buněk aniž bych do nich dopisoval funkci svyhledat?

Viz příloha.
Mám zde tabulku Boxů a potřebuji aby uvedené rozměry boxu v tabulce byly doplněny přímo do žlutě a zeleně označench políček. Problém je v tom že ve žluté a zelené bunce nechci vzorec protože hodnoty bude možní zadat i manuálně a tím je i přepsat.

Re: Doplnění hodnot

Napsal: 15 lis 2015 19:13
od cmuch
Jedině pomocí makra (VBA).

Re: Doplnění hodnot

Napsal: 16 lis 2015 16:30
od p.bublik
s tím jsem počítal a bylo by takové k mání?

Re: Doplnění hodnot

Napsal: 17 lis 2015 18:04
od cmuch
Třeba takto, makro vlož do modulu listu (Alt+F11) a přiřaď výběru.
Nejsou ošetřeny chyby (nenalezení hodnoty...)

Kód: Vybrat vše

Sub SetCellsValue()
  Dim KeyCells As Range, SearchCells As Range
 
  With ActiveSheet
    Set KeyCells = .Range("K4")
    Set SearchCells = .Range("L4:O7")
 
    .Range("D8").Value = Application.WorksheetFunction.VLookup(KeyCells, SearchCells, 3, False)
    .Range("E8").Value = Application.WorksheetFunction.VLookup(KeyCells, SearchCells, 4, False)
  End With
End Sub

Re: Doplnění hodnot

Napsal: 17 lis 2015 21:22
od guest
Potřebuju najít majitele trička, ale nechci použít psa. Tak převlékneme psa do kožichu medvěda a pošleme ho do lesa. Možná by stačilo naučit se nahradit vzorce jejich výsledky případně jinou hodnotou. Jenže makro je in, že jo. Asi by byl ze mě Igor Hnízdo.

Re: Doplnění hodnot

Napsal: 20 lis 2015 16:26
od cmuch
Možná by stačilo naučit se nahradit vzorce jejich výsledky případně jinou hodnotou.

To mě zajímá. Dík

Re: Doplnění hodnot

Napsal: 21 lis 2015 19:13
od guest
Doporučuju nastudovat CTRL+C, pravé tlačítko myši a Vložit jinak / Hodnoty.

Re: Doplnění hodnot

Napsal: 23 lis 2015 20:41
od p.bublik
děkuji za makro funguje, problém ale je v tom že musím pro každou změnu spustit makro ručně?

Re: Doplnění hodnot

Napsal: 24 lis 2015 06:53
od cmuch
Doporučuju nastudovat CTRL+C, pravé tlačítko myši a Vložit jinak / Hodnoty.

To sice jo, ale přijde zase o vzorec, nebo to špatně chápu?


To makro přiřaď tomu comboboxu přes pravé tlačítko.

Re: Doplnění hodnot

Napsal: 24 lis 2015 17:37
od guest
A já se ptám, na co potřebujete dlouhodobě udržovat vzorce?

Re: Doplnění hodnot

Napsal: 24 lis 2015 20:10
od p.bublik
Já jsem uváděl že nechci vzorec, že se bude jednat asi o makro, jen chci aby se do vybraných dvou buněk po výběru z nabídky vedle doplnila přednastavená hodnota (bud přímo v makru nebo z nějaké náhradní tabulky). Jedná se cca o 20 položek různých rozměrů s tím že bude možné do vybraných dvou buněk doplnit hodnoty ručně a ne pomocí výběru. Viz jak uváděl cmuch to makro to funguje dobře, ale pro každou změnu hodnot musím znovu pustit to makro :(

Re: Doplnění hodnot

Napsal: 26 lis 2015 05:53
od cmuch
Jak jsem psal výše, přiřaď toto makro výběrovému seznamu.
Potom po výběru hodnot se automaticky spustí makro, nebo potom nechápu.