Polecam ścieżkę z serii copy-paste, czyli
1. Zaznacz kolumnę z danymi
2. wybierz Ctrl+c czyli kopiuj
3. Przejdź do kolumny obok
4. Wybierz menu Edycja -> Wklej Specjalnie -> Wartości -> to spowoduje, iż
formuły sumujące zostaną pominięte
5. Zsumuj tak utworzoną kolumnę
Piotr Sztuk
Inż. Pomocy technicznej
Pomoc Techniczna Microsoft
http://support.microsoft.com
// Uprzejmie proszę o nie wysyłanie zapytań bezpośrednio na mój adres email.
Zapytania takie pozostaną bez odpowiedzi, gdyż adres ten nie jest
monitorowany. //
Użytkownik "JerzyMarian" <jerzy...@discussions.microsofrt.com> napisał w
wiadomości news:FA16CAA2-B30C-4E08...@microsoft.com...
--
Bamek
ba...@bam.pl
Panowie dziekuję za podpowiedz, ale nie działa podpowiedziana metoda. Jak
wybieram "wklej specjalnie" - "wartości" to sumy tez sa przenoszone. Jak
nieudolnie przedstawiłem wyżej komórka e1 jest suma komórek c1 i d1(40) a
komórka k1 jest suma komórek h1,i1,j1 (100). Winno byc (w tym przykładzie)
310 a daje 352 (bo wszystko sumuje), nawet jak zastosowałem "wartości" i
"transpozycje". To jest Excel 2007. Jego sprawka czy tez ja jestem taki
głupi. Pozdrawiam
--
JerzyMarian
„Bamek” pisze:
> > 1. Zaznacz kolumn z danymi
> >
> > 2. wybierz Ctrl+c czyli kopiuj
> >
> > 3. Przejd do kolumny obok
> >
> > 4. Wybierz menu Edycja -> Wklej Specjalnie -> Wartoci -> to spowoduje, i
> > formuy sumujce zostan pominite
> >
> > 5. Zsumuj tak utworzon kolumn
> ----------------------------------------
> Formuy zostan pominite, ale wartoci w polach sumujcych nie.
>
> --
> Bamek
> ba...@bam.pl
>
JerzyMarian
--
Bamek
ba...@bam.pl
Proponuje napisac wlasna funkcje w VBA... cos na ksztalt tej ponizej.
Funkcji uzywa sie tak, jak kazdej innej, lezy w sekcji funkcji uzytkownika.
Pozdrawiam
Michal
Function SUMUJ_BEZ_FUNKCJI(zakres As Range) As Double
Dim wynik As Double
Dim komorka As Range
wynik = 0
For Each komorka In zakres
If komorka.HasFormula = False And IsNumeric(komorka.Value) Then
wynik = wynik + komorka.Value
End If
Next
SUMUJ_BEZ_FUNKCJI = wynik
End Function