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
 
 » RoBakk 16:22
 » soyo 16:22
 » DJopek 16:16
 » bajbusek 16:13
 » Dexter 16:11
 » Chavez 16:10
 » rzymo 16:04
 » metacom 16:04
 » Sebek 16:01
 » BONUS 15:57
 » faf 15:54
 » Visar 15:53
 » rooter666 15:52
 » Wedrowiec 15:48
 » adolphik 15:47
 » sofolok 15:46
 » Pietka 15:40
 » jenot 15:39
 » globi-wan 15:39
 » Artaa 15:38

 Dzisiaj przeczytano
 41143 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