Twoje PC  
Zarejestruj się na Twoje PC
TwojePC.pl | PC | Komputery, nowe technologie, recenzje, testy
B O A R D
   » Board
 » Zadaj pytanie
 » Archiwum
 » Szukaj
 » Stylizacja

 
M E N U
  0
 » Nowości
0
 » Archiwum
0
 » Recenzje / Testy
0
 » Board
0
 » Rejestracja
0
0
 
Szukaj @ TwojePC
 

w Newsach i na Boardzie
 
OBECNI NA TPC
 
 » cVas 00:15
 » ReeX 23:33
 » Chan 23:23
 » Irix 23:22
 » Mademan 23:21
 » ::LinX:: 23:20
 » Flo 23:14
 » ligand17 22:55
 » emigrus 22:51
 » nth4 22:43
 » Fl@sh 22:41
 » marcin502 22:36
 » Wedelek 22:36
 » myszon 22:34
 » ili@s 22:32
 » [yureq] 22:25
 » globi-wan 22:24
 » Wolf 22:24
 » ManiusNG 22:12
 » wrrr 22:04

 Dzisiaj przeczytano
 2222 postów,
 wczoraj 36534

 Szybkie ładowanie
 jest:
włączone.

 
ccc
TwojePC.pl © 2001 - 2026
A R C H I W A L N A   W I A D O M O Ś Ć
    

Problem z makrem w Excelu , turzol 2/10/06 12:53
Mam problem z pewnym makrem. Otóż jest to proste makro zamieniające , na . w poszczególnych komórkach. Niestety po wykonaniu zmienia wszystkie wartości w komórkach na tekstowe (zielone trójkąty przy wartościach) i trzeba ręcznie wszystko zmieniać na format liczbowy...

Wklejam cały kod z VBA:
Sub Makro1()
'
' Makro1 Makro
' Makro zarejestrowane 2006-10-02, autor turzol
'

'
Rows("1:2").Select
Selection.Delete Shift:=xlUp
Columns("N:AE").Select
ActiveWindow.ScrollColumn = 1
Selection.Replace What:=",", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("D1").Select
Selection.ClearContents
Range("F1").Select
Selection.ClearContents
Range("I1").Select
Selection.ClearContents
Rows("1:1").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Selection.Replace What:=",", Replacement:=".", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("F4").Select
End Sub


Co jest nie tak, dane wejściowe są na pewno w formacie liczbowym

trance addicted
:B ::KX:: ::ASIO Otachan::

  1. To dodaj , Hiper 2/10/06 15:53
    jeszcze makto, które zamienia te komórki na format liczbowy.

    Szukam pracy jako informatyk (we
    Wrocq).

    
All rights reserved ® Copyright and Design 2001-2026, TwojePC.PL