Darek M.

Darek M. fizyczny

Temat: hokus pokus

potrzebna pomoc w takiej sprawie.a minowicie chcę utworzyć tabelę w ,której przedstawiona zawartość po kliknięciu w komórke zniknie a po ponownym kliknięciu pojawi sie w niezmienionej formie.
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: hokus pokus

Proponuję obsługą zdarzenie change i przenoszenie wartości do bardzo ukrytego arkusza.
Darek M.

Darek M. fizyczny

Temat: hokus pokus

fajnie,a tak bardziej obrazowo,nie jestem tak biegły w excelu.dzięki z góry.
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: hokus pokus



Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim ukryta As String

' w cudzysłowie podaj nazwę zakładki
ukryta = "Ukryta"


If Target.Cells.Count > 1 Then Exit Sub
If Sheets(ukryta).Visible <> 2 Then Sheets(ukryta).Visible = 2

If Target.Value <> "" Then
Sheets(ukryta).Range(Target.Address) = Target.Value
Target.Value = ""
Else
Target.Value = Sheets(ukryta).Range(Target.Address)
End If


End Sub
Sławomir Broda edytował(a) ten post dnia 07.10.12 o godzinie 01:31
Darek M.

Darek M. fizyczny

Temat: hokus pokus

dzięki,poćwiczę i się okaże ile potrafię w tym temacie.
Monika M.

Monika M. PROGRAMISTA VBA,
Excel, Access,
Outlook, Word -
SZKOLENIA

Temat: hokus pokus

Darecki Darek:
potrzebna pomoc w takiej sprawie.a minowicie chcę utworzyć tabelę w ,której przedstawiona zawartość po kliknięciu w komórke zniknie a po ponownym kliknięciu pojawi sie w niezmienionej formie.
A ja się jak zwykle zastanawiam, do czego to jest potrzebne?
Bo może się okazać, że np. potrzebuje Pan sprawdzić kalkulację dla pewnych składowych, które czasem nie występują, dlatego chce Pan móc je ustawić jako niewidoczne, ale za chwilę wrócić do tych wartości i obejrzeć kalkulację z tą wartością.
Jeśli to by było coś "w ten deseń", to lepiej skorzystać z tzw. scenariuszy.

Więcej mogę przedstawić po napisaniu przez Pana o co dokładnie chodzi.
Darek M.

Darek M. fizyczny

Temat: hokus pokus

tak jak napisałem jest to czysta ciekawość i zabawa zarazem,nie jestem programistą,nie jestem informatykiem.ot wpadła mi myśl do głowy i szukam rozwiązania,miło mi,że wzbudziłem zainteresowanie,teraz bawię sie w te krzaczki,które otrzymałem od pana Sławomira.przydałby sie jakiś mały gotowiec,a tak bedę musiał wytęzyć szare komórki.pozdrawiam.
Sławomir Broda

Sławomir Broda VBA, Excel, Access,
SAP i wszystko
związane z
automatyzac...

Temat: hokus pokus

Darecki D.:
tak jak napisałem jest to czysta ciekawość i zabawa zarazem,nie jestem programistą,nie jestem informatykiem.ot wpadła mi myśl do głowy i szukam rozwiązania,miło mi,że wzbudziłem zainteresowanie,teraz bawię sie w te krzaczki,które otrzymałem od pana Sławomira.przydałby sie jakiś mały gotowiec,a tak bedę musiał wytęzyć szare komórki.pozdrawiam.
Te krzaczki to jest gotowiec. Wkleja Pan kod do edytora VBA do arkusza w którym zmiana ma się odbywać i jedyne co jest wymagane to zakładka o nazwie "Ukryta".
Darek M.

Darek M. fizyczny

Temat: hokus pokus

VBA uruchomiłem,tylko co jest tym kodem i gdzie go wkleić?Pozdrawiam

Temat: hokus pokus

Darek M.:
potrzebna pomoc w takiej sprawie.a minowicie chcę utworzyć tabelę w ,której przedstawiona zawartość po kliknięciu w komórke zniknie a po ponownym kliknięciu pojawi sie w niezmienionej formie.


Dosłownie czegoś takiego nie zrobisz, chyba, że ma działać tylko po kliknięciu prawym przyciskiem myszy, bądź dwukilk.
Podany wyżej przykład reaguje na zmianę w komórce. Jak chcesz po kliknięciu, to można zmienić na
SelectionChange

ale to zdarzenie nie zadziała kiedy klikniesz drugi raz w komórkę już zaznaczoną.
Darek M.

Darek M. fizyczny

Temat: hokus pokus

już sobie poradziłem,temat nieaktualny,dzięki za odzew.



Wyślij zaproszenie do