檢查網域內所有ip的存文字檔的bat寫法
如題,以下內容用純文字檔案編輯貼上後,存檔作執行即可。
192.168.1.1開始:
@echo off
for /L %i in (1,1,255) do ping 192.168.1.%%i -n 1
pause
192.168.0.0 開始:
@echo off
for /L %i in (1,1,255) do ping 192.168.1.%%i -n 1
pause
喜歡攝影的我,喜歡到處拍拍照,吃點當地的特色食物。 跟朋友聊天之餘,推薦我寫成網誌跟大家分享。 沒外出的日子,喜歡在家當隱性宅,寫程式看看書,追劇。 希望我的手札文,不會讓你翻桌 XD
檢查網域內所有ip的存文字檔的bat寫法
如題,以下內容用純文字檔案編輯貼上後,存檔作執行即可。
192.168.1.1開始:
@echo off
for /L %i in (1,1,255) do ping 192.168.1.%%i -n 1
pause
192.168.0.0 開始:
@echo off
for /L %i in (1,1,255) do ping 192.168.1.%%i -n 1
pause
<Exec Command=""%(GradlePackage.ToolName)" %(GradlePackage.AdditionalOptions) clean" WorkingDirectory="$(WorkingDirectory)"/>
先說說新聞:
圖1.新聞關鍵字搜尋截圖
2.美國財政部長,對於10年期美債利率的政策:新聞 2025.2.6 更多 更多
圖2.新聞關鍵字搜尋截圖
3.再來看看年初到今天美元與日圓走勢:
圖3.自己整理的走勢
圖4.LINE紀錄
這些都是自己的想法,且付諸執行中,寫寫文章做作紀錄。
最後為何寫本篇,因為FED會議紀要,沒有要急降息拉,
所以存存美金當然是有便宜的,就撿來存定存。
第一個重點:
財政部長,這位掌握遊戲規則的人,都洩題了,當然答案要照抄一次,
然後持續溫習,呵呵。
第二、美元日圓走勢圖:
日本開始走升息之路,未來到底日圓跟美元之間,美元走強是否等於給日圓有空間也走強,這實在太曖味了,我也不懂。但亞幣誰敢走比美元強?
第三、10年期美債殖利率走低:
這是川X總統+美國財政部的某男人,等等綜合體,以及MAX的新工作
為何???利率高債便宜,利率低債貴,並且利率低對於美債付出去的利息,也是個緩解,配合政府效率委員會等等最近的動作,不外乎就是一個目標,降低美國財政壓力;
不就在在明示+暗示美元有底氣可以走強;當然若有客官在去年同時買了美國國債,現在應該也不錯歐。
但小編不免還是要提一下,若前面都沒跟到,現在存台幣定存,也至少每個月利息,等於可以免費看NETFLIX,引用我堂哥說的話,你不理財財不理你。
有理自然有梳理到財的機會,讚拉。
最後希望每一個看到這篇紀錄文的人,都可以作小抄,然後發大財。
設置圖表1的X軸標籤的文字大小
ActiveSheet.ChartObjects("圖表 1").Activate
With ActiveChart.Axes(xlCategory).TickLabels.Font
.Size = 12 ' 設置字體大小為 12
End With
修改標籤的標題文字大小、字體、顏色
With ActiveChart.ChartTitle.Font
.Name = "Arial" ' 字體名稱
.FontStyle = "Bold" ' 字體樣式
.Size = 14 ' 字體大小
.Color = RGB(255, 0, 0) ' 字體顏色
End With
其他常見的修改與方式:
'修改字體種類
ActiveChart.Axes(xlCategory).TickLabels.Font.Name = "Arial"
'粗體
ActiveChart.Axes(xlCategory).TickLabels.Font.Bold = True
'斜體
ActiveChart.Axes(xlCategory).TickLabels.Font.Italic = True
'底線
ActiveChart.Axes(xlCategory).TickLabels.Font.Underline = xlUnderlineStyleSingle
使用方法:
複製SUB
打開excel
進入開發人員設計模式中
使用專案管理員
新增模組
貼上SUB
開始測試
重點在於
做一個ACTIVEX按鈕
然後知道物件名稱後例如:圖表 1
就可以透過CALL執行SUB了
完成
VBA LINK
影片:
寫了一個計算cp、cpk、mean、std的vba工具
提供資料所在位置的range物件、規格上下界線後,即可自動計算。
透過一般函數使用方式即可滿足。
CalculateCpkAndCp_OUT = Calculate_Cpk_And_Cp(MYRANGE, FIND_OUTUP, FIND_OUTDOWN)
vba:
go for run
自動把Word 舊格式 轉成 Office365的格式
vba:
應用:
打開 Excel,按" Alt + F11
"打開 VBA 編輯器。
在 VBA 編輯器中,選擇 "插入 > 模組
"來新增一個模組。
將你提供的 VBA 程式碼複製並貼到新建的模組中。
保存工作簿 "Ctrl + S"
。
Private Sub CommandButton1_Click()
Call ConvertTemplatesToOffice365("c:\下半年度).doc")
End Sub
也可以結合FileDialo物件作操作的,一次處理多檔案。
最近有一個整理資料的需求。
但又不想做SQL,
所有我就做了一個資料包方式做處理
但每次有78萬筆資料要執行2次篩選
剩下約400筆資料才是本次需求的資料。
然後這400筆資料還要按照年度與科目都到表單上,
要一直不斷重複操作物件,效率大大下降。
所以我想了一個類似一半物件一半陣列的方式。
先篩選完後,全部讀到陣列中,
一開始是篩選完,單獨複製成一張工作表上,
再來讀成陣列。
但我發現這樣做,無法多緒處理。
所以進化成直接讀成陣列方式。
一次一列一列讀成陣列。
原本20秒變成1秒不到。
有時候想想,就是要努力嘗試,才能累積能量。
接下來思考陣列對接的計算方式,連寫入的次數,我都要控制。
有機會寫寫教學文。