konto usunięte

Temat: zmiana formatu w komórce

Witam
Chciałbym się dowiedzieć czy istnieje możliwośc kopiowania formatu komórki w której jest odnieseinie do innej jedenj konkretnej komórki także w zależności zmiany formatu macierzystej komórki.
Mam przykład zmienisjącego się numeru NIP, który może przybierać format np:

1) xxx-xxx-xx-xx

albo

2)xxx-xx-xx-xxx

Dzięki za wskazówki

konto usunięte

Temat: zmiana formatu w komórce

Witam,
może wystarczy malarz formatów ?? :) Jeżeli manualnie nie wystarczy to pozostaje raczej VBA. Pzdr.Darek J. edytował(a) ten post dnia 02.09.10 o godzinie 12:29

konto usunięte

Temat: zmiana formatu w komórce

Jest to dokument który ma kilka takich odniesień do jednej komórki macierzystej a nie ukrywam że chciałbym go w miarę zautomatyzować...
Janusz K.

Janusz K. Ekspert rozwoju i
przyszłości firm,
struktur, systemów
or...

Temat: zmiana formatu w komórce

A nie wystarczy zwykły znak równości w komórce docelowej i wskazanie jako źródła tej komórki, w której się ten NIP pojawia?

Temat: zmiana formatu w komórce

Tekst widoczny w komórce zależy od umieszczonej w niej wartości i formatowania. Nie ma funkcji do odczytania formatowania 'liczbowego'.
Proponuję użyć funkcję użytkownika, która zwraca tekst wyświetlany w odniesieniu:
Function TekstW(komorka As Range) As String
Application.Volatile
TekstW = komorka.Text
End Function

konto usunięte

Temat: zmiana formatu w komórce

Mnie udało się to zrobić w ten sposób oczywiście z pomoca

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("G43").NumberFormat = TekstW(Range("G11"))
End Sub
Function TekstW(komorka As Range) As String
Application.Volatile
TekstW = komorka.NumberFormat

End Function



Wyślij zaproszenie do