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
 
 » arra 12:31
 » KHot 12:29
 » Nikita_Be 12:21
 » off 12:21
 » Liu CAs 12:21
 » rurecznik 12:18
 » ham_solo 12:18
 » etranger 12:16
 » bodeq 12:03
 » Chrisu 12:02
 » tian 12:01
 » rainy 11:52
 » m&m 11:51
 » dulik 11:45
 » power 11:45
 » burz 11:43
 » DJopek 11:32
 » Guli 11:30
 » JE Jacaw 11:20
 » PeKa 11:15

 Dzisiaj przeczytano
 14691 postów,
 wczoraj 23266

 Szybkie ładowanie
 jest:
wyłą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