返回列表 上一主題 發帖

[發問] 請教*.csv檔，如何在儲存格加上顏色後，再存成.csv檔~~

vesperlee

帖子
15 
主題
7 
精華
0 
積分
69 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
20 
性別
男 
註冊時間
2011-7-29 
最後登錄
2021-7-4 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2013-12-14 22:41 | 只看該作者

[發問] 請教*.csv檔，如何在儲存格加上顏色後，再存成.csv檔~~

請教*.csv檔，如何在儲存格加上顏色後，再存成.csv檔~~

請教如何使用VBA開啟一個"測試.csv"檔後，副程式裏在"測試.csv"檔內運算，
並在儲存格內加上顏色。但在存檔後，顏色會不見。

請教如何使用VBA，開啟"測試.csv"檔後，運算完存檔成  "測試.csv" (覆蓋原本的檔)
而不是 另存成一個  "測試.xls"  的新檔。

謝謝！感恩~~。
以下為 相關問題資料。感恩~指教~~~。


資料整理-102.12.14.rar (27.54 KB)
收藏 分享

vesperlee

帖子
15 
主題
7 
精華
0 
積分
69 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
20 
性別
男 
註冊時間
2011-7-29 
最後登錄
2021-7-4 
4#
發表於 2013-12-15 16:22 | 只看該作者
殘念~~~！
剛剛看了一下，*.csv檔和*.xls檔  的大小果真差很多。原來*.csv是文字格式的檔案,
謝謝  GBKEE 大大的說明。

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
3#
發表於 2013-12-15 15:12 | 只看該作者
回復 2# vesperlee

csv是文字格式的檔案,不可儲存,儲存格的(字型及大小,圖樣顏色.公式...)
感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限,  一天1元的贊助,人人有能力.

TOP

vesperlee

帖子
15 
主題
7 
精華
0 
積分
69 
點名
0  
作業系統
XP 
軟體版本
SP3 
閱讀權限
20 
性別
男 
註冊時間
2011-7-29 
最後登錄
2021-7-4 
2#
發表於 2013-12-15 02:20 | 只看該作者
Sub test()
   Get_Path_LEN = Len(Application.ActiveWorkbook.FullName)    '取得檔案完整名路徑及名稱
   Get_Date_name_LEN = Len(Application.ActiveWorkbook.Name)        '取得 檔案  名稱
   Full_path_name = Left((Application.ActiveWorkbook.FullName), Get_Path_LEN - Get_Date_name_LEN) '取得 完整路徑
   
Open_download_Date = Full_path_name & "測試.csv"
     Workbooks.Open Open_download_Date  ' 開啟  檔案
     
           '運算測試檔(在csv加入運算及顏色)
                                                           
     Workbooks("測試.csv").Close SaveChanges:=True  '====>>>>>存檔後  *.csv顏色還是不見了？
Application.DisplayAlerts = True  '恢復警告視窗
   
End Sub


用這個方法，還是沒辨法改善，*.csv顏色還是會不見！
麻煩指教~~~，謝謝~~~

TOP

        靜思自在 : 能付出愛心就是福，能消除煩惱就是慧。
返回列表 上一主題