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
 
 » DJopek 16:53
 » NimnuL 16:51
 » KHot 16:47
 » AfiP 16:45
 » NWN 16:45
 » XepeR 16:41
 » Kenny 16:40
 » Magnus 16:37
 » Saszkin 16:36
 » elliot_pl 16:31
 » Artaa 16:30
 » Sherif 16:30
 » soyo 16:30
 » hokr 16:17
 » PaKu 16:14
 » Tomasz 16:08
 » myszon 16:08
 » exmac 15:54
 » bajbusek 15:54
 » SebaSTS 15:52

 Dzisiaj przeczytano
 41106 postów,
 wczoraj 25974

 Szybkie ładowanie
 jest:
włączone.

 
ccc
TwojePC.pl © 2001 - 2024
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-2024, TwojePC.PL