2024年3月31日 星期日

iPhoneの「ショートカット」はAI(Gemini、ChatGPT)でオートメーションを作成する

 iPhoneショートカットオートメーション 生成 プロンプト(例えば フラッシュライン💡)

コメント: 

💜 スクリプテイング (オフィシャルの用語) 誤認を最小限に抑えるため、公式用語をAIに学習させる

💜バックグラウンド オートメーションの消費電力に注意が必要となるかもしれません😅

 

 


あなたはiPhoneショートカット(高度なテクニック)の達人だ。

APPLEの公式ショートカットドキュメント(ショートカット ユーザガイド、ショートカットギャラリー)、またはグーグル検索エンジンでショートカットの例を検索し、セットアップの参照にしてください。

以下の設定を、最も詳細なSTEP BY STEPで教えてください。

{{デフォルト入力}}が手動入力の場合、SIRI音声入力機能は使用ではありません
もし、{{デフォルト入力}}がSIRI音声入力の場合,SIRI音声入力機能と組み合わせてKEYWORDキーワード検索を行うことができます。


Web アクシヨン関連機能で{{使用のニーズ}}がある場合は、公式サイトを参照して
WEBページ・URL関連などアクションコンポーネント設定機能を活用することで
WebページでJavaScript・URLと関連コンポーネントを利用することで作成できます。
Web アクシヨン以外の{{使用のニーズ}}がある場合は 詳細な操作方法について公式マニュアルを参照してください。

"""
デフォルト入力: 手動入力
使用のニーズ:

フラッシュライン オン 、
アラート を表示、
フラッシュライン オフ

"""

 

その他の言語(中国語)オートメーション

AI(Gemini、ChatGPT)試作,生成一位老師,輔助ShortCuts捷徑 操作教學設定

 情境:因不算果粉,想藉由AI幫助,Step By Step方式,教導APPLE手機 ShortCuts捷徑功能 進行自動化處理,
因此AI生成一位老師輔助教學設定,可更深入運用手機之自動化工具

使用說明:輸入捷徑之內建功能、搭配自己的部分功能需求,再藉由AI協助,教導ShortCuts捷徑之運用,
但要注意的是 建議使用捷徑 內建功能名稱(即 工序指令),以利AI可快速找到您要的需求,例如:手電筒 ,就建議用預設名稱 ,如:設定手電筒 ,減少AI去揣測您的需求,導致產出結果偏離本意
同理,其它功能 自動化操作也不例外,建議  使用預設功能名稱,以下為 開關手電筒 範例PROMPT.

💜播報天氣(溫度、降雨機率)

💜開啟、關閉Wi-Fi 

💜開啟、關閉 Bluetooth藍牙 (口頭告知已關閉,可指定您常用的藍牙裝置,省去每次再指定)

 從包含  的選單中選擇
OPEN,
設定藍牙 開啟,
將播放位置 設定 為 BlueToothDeviceName,
停止此捷徑

CLOSE,
關閉 Bluetooth,
朗讀文字 Bluetooth已關閉、
停止此捷徑
結束選單

💜設置媒體、鈴聲等靜音設定

 

相關查詢:工序指令 (告知AI官方用語減少誤判)

注意事項: 經測試下來,不知是手電筒耗電?或設多個背景自動化程式,可能需留意耗電量也會跟著攀升⇗


你是 iPhone 捷徑 Shortcuts(高级技巧)的操作使用教學達人。

請參考 APPLE 官方 捷徑操作文件(如:快捷指令使用手册、高級快捷指令、快捷指令大全、Shortcuts Gallery)做為設定參照之參考依據。
或Apple GALLERY資料庫 有現成與 {{使用需求}} 亦可直接提供
或 Google搜索引擎中搜索 shortcuts {{使用需求}}範例

請盡可能以簡潔易懂方式 STEP BY STEP的操作教學。

{{預設輸入}} 如為 人工手動 ,不藉助SIRI 語音输入功能 ,
若 {{預設輸入}} 如為 SIRI語音輸入,輸入想結合 藉由SIRI 語音输入功能,可將欲查詢KEYWORD關鍵字,做為輸入主要來源  


如果為網頁需求,請參考下面內建功能
捷徑功能 網頁  URL相關功能 JavaScript 通过使用 WEBURL 页面和 URL 相关等操作组件设置功能

以利傳送 KEYWORD 关键字,給欲查詢的網站

如果非網頁需求,請參照官方手冊,提供詳列出操作資訊

最後,請於YOUTUBE影音網站,找尋 與{{使用需求}}主要相關連之資訊出來


"""
預設輸入:人工手動

使用需求:

設定手電筒 開啟 、

顯示提示 按一鍵、

設定手電筒 關閉 

"""


iPhone黑色框框跟方塊怎麼解決?(VoiceOver)

情境:
因為不小心啟用了VoiceOver,導致畫面點選出現黑色框框,且變得不易操作?
按了不下數十次,才能作動,難以滑到 關閉 縮放 、旁白 位置,予以關閉設定。


解決辦法:請SIRI協助,告知SIRI到⌈縮放⌋,由它幫忙帶出設定畫面後,進行關閉。
        或直接說出   旁白 ,找不到旁白 ,它可自動幫您找到 旁白 位置,將它關閉。

即可秒殺地完成關閉設定😁

相關查詢:
旁白(英語:VoiceOver)

iPhone黑色框框跟方塊怎麼解決

2024年3月17日 星期日

藉由AI(Gemini 、ChatGPT..),剖析 🔎敬語句型

情境:因對敬語(Honorifics)不熟悉,不明白敬語主體之動作執行者是誰?所以透過AI神器,協助剖析敬語之使用。

說明一:使用方式,請將下列PROMPT提示詞模版資訊,複製並貼到AI神器去查詢。

說明二:敬語文表現:請將要查詢之敬語表現句子,用"""      """,(三重引用符號)標示起來,相關PROMPT提示詞模版資訊,即下方藍色部分。

說明三:囿於AI回應字數長度限制,如有覺得停頓住、未完全呈現結果,可再下     続き 提示,請AI繼續產出未完成部分(如:影片資訊,可再依其產出「關鍵字之線索資訊接續去YOUTUBE直接查詢)

 

相關查詢:
藉由AI神器💯,來學習日本語 彙整索引資訊

 

あなたは日本語のプロで、ビジネス敬語の達人です

まず、{{敬語文表現}}の意味を把握することで、敬語表現は話し手の状況、状況内外の関係、敬語の動作主体を箇条書きまたは図表形式で詳しく説明してください。

それ敬語の他の表現文型(辞書形、尊敬語、謙譲語、丁寧語)、それぞれの動作主体を表形式にリストアップしてください。美化語(ご、お)や格助詞やほかの修飾詞は除きますが。

もし、その表現は不自然な敬語表現や役割の違いや二重敬語あるいはより適切な言葉遣いを指摘してください。

訂正前と訂正後の記事を比較のためにリストアップしてください。

それぞれの敬語に焦点を当てたYOUTUBE動画を挙げてください

上記は繁体字中国語に翻訳してください。


"""

敬語文表現:


ご注文が送れない状況でご迷惑をおかけ致しますが、どうかご理解いただきたく、よろしくお願い申し上げます。


"""

 

2024年3月13日 星期三

藉由AI(Gemini 、ChatGPT..),協助解答 並び替え(句子重組)題型之日文考題

情境:網路上有時可看到排列組合考題,亦有解答,但有時答案解析,仍無法掌握考題之上下文關係及語順,所以經由AI神器生成一位日文排列組合答題老師,隨時幫您解惑😀

使用說明:排列組合問題解析,將自己想知道排序問題,於下方問題文⌋進行替換(墨綠色部分)

,請注意經測試AI回覆不一定每次都精準找出正確解答(建議提問時,先去除作答欄選項別之記號★ ,改成4個___ ___ ___ ___,避免干擾AI答題判斷?),如AI答題結果可能有誤( 可能是您的問題漏打了1個助詞「を」等,產出順序亦可能會有不同結果😅),可再補提將您認為正確答案  正解は2 4 3 1⌋告知AI,它即會再重新解析確認,此法僅供學習輔助參考😀。

試題資料來源:日本語能力試験公式 ウェブサイト (2018年N1)

相關查詢:
藉由AI神器💯,來學習日本語 彙整索引資訊

 

あなたは日本語のプロであり、国語の問題を解きの達人です。

{{問題文}}は並び替え(文の組み立て)問題です、問題文そのものを変更することはできません。
与えられた選択肢の中から、1から4まで最も適切な順番に並べ替えることが求められます。

Googleの検索エンジンで同様の問題がクエリを分析しても構いません。ただし、元の選択肢の質問を変えないように注意しなければなりません。

並べ替え問題を解く際のポイントとしては、以下の点が挙げられます。

文全体の構造: 主語、述語、目的語などの文の要素を把握し、それぞれの要素がどのような関係にあるのかを考えます。
    
文全体の構造と各語が文中で果たす役割(各単語・助詞・副詞・名詞など)を把握することで、各要素の関係性や文脈上の整合性を判断し、論理的な流れを考えられるようになります。
    
語の働き: 各単語が文中でどのような働きをしているのか(主語、述語、修飾語など)を分析します。
文脈: 文全体の意味を捉え、各選択肢が文脈に合っているかどうかを判断します。
文法: 文法的な誤りがないかを確認します。
    
例えば、
文脈と矛盾したりする選択肢を選ぶと、並べ替え問題を間違える可能性が高くなります。

そのため、答え合わせの際は、必ずもう一度確認するようにしましょう。
もし、文法ルールに沿っていないことに気づいたら、解答をやり直しなければなりません。

上記の文章を理解するため、主に主語、賓語、格助詞の分析に基づいた文章フレーム構成の図表化で挙げてください。
{{問題文}}の文法解説・構文解析を簡潔な概要でまとめてください。


上記の指示を理解し、以下のフォーマットで回答してください。
最も適切な解答を1から4まで正しい順番: [番号] [番号] [番号] [番号]

{{問題文}}の文法に焦点を当てたYOUTUBE動画を挙げてください

最後に繁体字中国語翻訳してください



"""

問題文:


「アセビ」という、白い花を咲かせる樹木を漢字で「馬酔木」と書くのは、アセビには_ _ _ _そうです。
1 由来する
2 有毒成分があり
3 状態になることに
4 馬が食べると酔ったような

"""

藉由AI(Gemini 、ChatGPT..),協助解答 4選1題型之日文考題

選択肢 4選1題型使用注意事項:

測試AI回覆不一定每次都精準找出正確解答,但就自學而言,在有答案,卻沒詳解時算是相當實用之輔助學習神器。 PROMPT提示詞,如下(藍色部分),正確答案應該為4 にもまして

使用說明:

💜將自己的問題,貼於下方 問題文

💜因為想更進一步瞭解破題關鍵,故可再向AI神器補提追問(今回の問題においては、文脈に合致するかどうかが最も重要な判断基準となりますが、他にもいくつかの解題のポイントがありますか)。

相關查詢:
藉由AI神器💯,來學習日本語 彙整索引資訊

 
あなたは日本語のプロで、国語の問題を解きの達人です。
{{問題文}}は1~4の中から最も適切なものを一つ選んでください。

まず、解答ヒント
A 、答えを急いで見つけようとしないでください。
B 、問題文をよく読む。
C 、各選択肢の意味を理解する。
D、文脈を踏まえ、各選択肢の意味と文脈の関係を分析し、最も適切な選択肢を一つ選びます。


答えはダブルチェックして、文法のルールに従わない場合は、もう一度やり直してください。


{{問題文}}の文法解説を簡潔な概要でまとめてください。
各選択肢や答えを箇条書きまたは図表形式で詳しく説明してください。
それぞれの選択肢の文法解説YOUTUBE動画を挙げてください。

最後に繁体字中国語翻訳してください


"""
問題文:
今年の花火大会は例年()、多く観光客が来場されました。
1  において
2  にかけては
3  にとどまらず
4  にもまして

"""

2024年3月12日 星期二

EXCEL表,透過MATCH比對函數,找出郵遞區號

 情境:有數百筆地址,沒有郵遞區號,如何經由EXCEL表透過函數,找出其對應之郵遞區號

工作表1,欄位樣式(待處理查詢郵遞區號之工作表),如下:
新北市板橋區文化路一段
新北市中和區中山路二段
新北市永和區中正路
新北市土城區學府路
新北市三重區正義北路
新北市蘆洲區長安街
新北市五股區新北大道一段
新北市泰山區貴陽街
新北市林口區文化一路
新北市鶯歌區中正一路
高雄市苓雅區三多四路
高雄市前鎮區中華五路
高雄市左營區博愛二路
高雄市楠梓區德民路
高雄市鳳山區光遠路
高雄市鼓山區美術東二路
高雄市岡山區岡山路
高雄市旗津區旗津三路
高雄市鹽埕區大勇路
高雄市仁武區仁武路



工作表2,欄位樣式適要(參照來源之工作表),如下:
220    新北市板橋區
221    新北市汐止區
222    新北市深坑區
223    新北市石碇區
224    新北市瑞芳區
226    新北市平溪區
235    新北市中和區
236    新北市土城區
237    新北市三峽區
238    新北市樹林區
829    高雄市湖內區
830    高雄市鳳山區
831    高雄市大寮區
845    高雄市內門區
846    高雄市杉林區
847    高雄市甲仙區
848    高雄市桃源區
849    高雄市那瑪夏區
851    高雄市茂林區
852    高雄市茄萣區


因為工作表1,地址全數相連,但EXCEL字串比對,需完全一致,因此需將工作表1,先經由EXCEL  資料剖析 |固定寬度(W)| 下一步(N) | 建立分欄線移至區 ,以利新北市OO區 獨立成1欄位



中華郵政郵遞區號,先下載後,並放置於EXCEL 工作表2
https://www.post.gov.tw/post/internet/Download/all_list.jsp?ID=2201#dl_link_2735



PROMPT提示詞下法(如藍色部分)

在EXCEL工作表1,A欄為空白欄,做為郵遞區號查詢後,放置處
在EXCEL工作表2,A欄為郵遞區號,B欄為地址含區
請使用OFFSET及MATCH函數,幫忙將工作表1之B1~B20地址,找出其郵遞區號



=IFERROR(OFFSET(工作表2!$A$1, MATCH(B1, 工作表2!$B$1:$B$20, 0) - 1, 0), "未找到該住址之郵遞區號")

2024年3月9日 星期六

TAIWAN台灣旅遊,藉由AI神器協助旅遊規劃參考。

情境:藉由AI神器,試作台灣旅遊景點規劃參考,PROMPT提示詞,如藍色部分

請自行修改,旅遊地點: 台北 、台中、高雄、花蓮(即 観光地の旅行:)


あなたは台湾の旅行コンサルタントです。

まず、下記の旅行ハイライトについて、関連する記事を政府観光局 やGoogleなどの検索エンジンで検索できます。

代表的な歴史・文化、台湾の原住民文化、著名な作家、寺院、祭りの日程と行事、名湯 、花見・紅葉、ハイキング、観光スポット、離島、旧市街の歴史的なウォーキングツアー、大型遊園地、博物館、美術館、酒蔵巡り、地元の伝統的な料理、B級グルメ、おすすめ ナビなどをについて説明してください。

歴史的・人的背景の記述を充実させましょう。具体的には、地元で歴史上の有名な人物と作家の名前、箇条書きや見出しを活用して読みやすくをお願いします
Google Mapsのリンクを追加



それぞれのに焦点を当てたYOUTUBE動画を検索してください


注意すべき点

With a Google map focusing on each {{観光地の旅行}} & Google Mapsのリンクを追加

プロジェクトを作成するにあたって、交通費は旅行プラン総費用の5分の1以下に抑えています。

{{人数}}、{{客の年齢}}、{{滞在期間}}のみならず、入国審查、保険、必要な持ち物リスト、季節、この先1週間の天気(現地時間)、ホテルの予約状況などにも応じて、{{観光地の旅行}}のおすすめや提案をする。



公共交通機関で1時間以内にアクセスできる場合、経路と交通手段をご記入ください、


以下の表に、 新台幣費用規劃 (台湾ドルなど)に換算してください、プロジェクトの総費用の見積もりと内訳(交通費・宿泊費・食費・観光費)、およびおすすめ理由と根拠をまとめてください。

最後に、繁体字中国語に翻訳してください。

"""


観光地の旅行:南投市
出発地:南投市

人數 :2人

客の年齢 :60才

滞在期間:2日

"""


US美國旅遊景點,請AI協助旅遊規劃

情境:藉由AI神器,請它幫忙美國旅遊規劃試作,PROMPT提示詞,如藍色部分

相關旅遊景點查詢: 藉由AI(Gemini 、ChatGPT..),來規劃Travel旅遊景點彙整資訊

 

可自行修改,旅遊景點 (即 観光地の旅行:)
ビッグシティ アメリカ東部
ビッグシティ アメリカ西部  
ビッグシティ アメリカ中部  




あなたはアメリカの旅行コンサルタントです。
まず、下記の旅行ハイライトについて、関連する記事を政府観光局 やGoogleなどの検索エンジンで検索できます。
代表的な歴史・文化、著名な作家、ブロードウェイげきじょう、世界遺産、国立公園、 森林、滝、グランドキャニオン、大聖堂、祭りの日程と行事、ハイキング、旧市街の歴史的なウォーキングツアー、名城、大型遊園地、アルバカーキ国際気球フェスティバル、カジノで遊ぶ 、ヘリコプター遊覧、天文台、映画スタジオツアー、博物館、美術館、アウトレット、酒蔵巡り、伝統的な料理、グルメ、一生に一度は行きたい観光スポット など  


世界遺産の歴史的・人的背景の記述を充実させましょう。具体的には、地元で歴史上の有名な人物と作家の名前、詳しい説明をお願いします。


それぞれのに焦点を当てたYOUTUBE動画を検索してください

注意すべき点
With a Google map focusing on each {{観光地の旅行}}.
プロジェクトを作成するにあたって、新幹線や格安航空券や国内線などの利用するはご遠慮ください、交通費は旅行プラン総費用の3分の1以下に抑えています。
{{人数}}、{{出発地}}、 {{客の年齢}}、{{滞在期間}}のみならず、入国審查、日祝お休み、曜閉まる、休暇、電源プラグ、薬、保険、必要な持ち物リスト、季節、この先1週間の天気(現地時間)、ホテルの予約状況などにも応じて、{{観光地の旅行}}のおすすめや提案をする。



公共交通機関で1時間以内にアクセスできる場合、経路と交通手段をご記入ください、

以下の表に、{{出発地}}の通貨を基準として、プロジェクトの総費用の見積もりと内訳(交通費・宿泊費・食費・観光費)、およびおすすめ理由と根拠をまとめてください。

それぞれの{観光地への旅行}にグーグル ナビもお願いします

最後に、繁体字中国語に翻訳してください。

"""

観光地の旅行:
ビッグシティ アメリカ中部
出発地:台湾
人數 :2人
客の年齢 :60才
滞在期間:6日

"""

EU歐洲旅遊景點規劃,AI查詢試作

情境:藉由AI神器,協助歐洲旅遊參考資訊,PROMPT提示詞如藍色部分。

相關旅遊景點查詢: 藉由AI(Gemini 、ChatGPT..),來規劃Travel旅遊景點彙整資訊


請自行修改旅遊地點關鍵詞 (即 観光地の旅行)

独仏旅行
フランス
イギリス
ドイツ




あなたはヨーロッパの旅行コンサルタントです。
まず、下記の旅行ハイライトについて、関連する記事を政府観光局 や Googleなどの検索エンジンで検索できます。
代表的な歴史・文化、著名な作家、世界遺産、国立公園、 森林、寺院、大聖堂宮殿、修道院、古代遺跡、壁、塔、畑、おとぎ話街道、祭りの日程と行事、ハイキング、旧市街の歴史的なウォーキングツアー、名城、大型遊園地、博物館、美術館、天文台、酒蔵巡り、ミュンヘン・オクトーバーフェスト、伝統的な料理、グルメ、一生に一度は行きたい観光スポットなど  


世界遺産の歴史的・人的背景の記述を充実させましょう。具体的には、地元で歴史上の有名な人物と作家の名前、詳しい説明をお願いします。


それぞれに焦点を当てたYOUTUBE動画を検索してください

注意すべき点
With a Google map focusing on each {{観光地の旅行}}.
単一の目的地に旅行する場合、航空機または高速鉄道で国境を越えた旅行は禁止されている。例えば、フランスに旅行する場合、ドイツへの国境を越えた旅行は禁止されている。

交通手段の乗り方について詳しく説明してください。
プロジェクトを作成するにあたって、格安航空券や国内線などの利用するはご遠慮ください、交通費は旅行プラン総費用の3分の1以下に抑えています。
{{人数}}、{{出発地}}、 {{客の年齢}}、{{滞在期間}}のみならず、入国審查、日祝お休み、曜閉まる、休暇、電源プラグ、薬、保険、必要な持ち物リスト、季節、この先1週間の天気(現地時間)、ホテルの予約状況などにも応じて、{{観光地の旅行}}のおすすめや提案をする。



公共交通機関で1時間以内にアクセスできる場合、経路と交通手段をご記入ください、

以下の表に、{{出発地}}での現金使用額を計算して、、プロジェクトの総費用の見積もりと内訳(交通費・宿泊費・食費・観光費)、およびおすすめ理由と根拠をまとめてください。

それぞれの{観光地への旅行}にグーグル ナビもお願いします


"""

観光地の旅行:
ドイツ
出発地:台湾
人數 :2人
客の年齢 :60才
滞在期間:10日

"""


2024年3月5日 星期二

請AI幫忙寫EXCEL VBA,並用內建繪圖元件幫忙畫 迴歸直線圖 ,及其找出其線性函數式

 情境:因EXCEL圖表製圖不熟悉,可透過AI工具,協助幫忙產出EXCEL VBA進行繪製

迴歸直線圖 ,及其找出其線性函數式。y = 4.341x + 43.017

 

EXCEL表格,如下:    

      A               B                  C
1 年度        行銷費X        銷售額Y
2  109               2                50
3  110               3                66
4  111               6                54
5  112               9                88
6  113               12              96

💚EXCEL預先準備環境
檔案 | 選項 |增益集 | 設定
增益集| 勾選 分析工具箱 | 確定


💚EXCEL分析操作設定, 資料 | 資料分析 | 迴歸 |確定
輸入Y範圍(Y): 工作表1!$C$2:$C$6
輸入X範圍(X): 工作表1!$B$2:$B$6
 

EXCEL迴歸分析產出結果,如下:
摘要輸出                               
                               
迴歸統計                               
R 的倍數    0.883984674                           
R 平方    0.781428904                           
調整的 R 平方    0.708571872                           
標準誤    11.02650511                           
觀察值個數    5                           
                               
ANOVA                               
    自由度    SS    MS    F    顯著值           
迴歸    1    1304.048555    1304.048555    10.72551108    0.046601631           
殘差    3    364.7514451    121.583815                   
總和    4    1668.8                       
                               
    係數    標準誤    t 統計    P-值    下限 95%    上限 95%    下限 95.0%    上限 95.0%
截距   
43.01734104    9.812397095    4.38397882    0.021976561    11.78991416    74.24476792    11.78991416    74.24476792
X 變數 1   
4.341040462    1.325515578    3.274982607    0.046601631    0.12265831    8.559422615    0.12265831    8.559422615



💚AI Prompt提示詞,下法,如藍色部分
有一個EXCEL表,第1列為標題列,A欄為年度,B欄為行銷費X,C欄為銷售額Y,
請用EXCEL VBA,利用其  資料分析  迴歸分析 ,產出迴歸直線圖  ,
X軸為 B欄 ,Y軸為C欄,處理圖表直到最後1筆 ,
請畫出迴歸直線  ,並且將其迴歸直線函數,表示出來

 

AI產出之巨集程式  ,執行CreateRegressionChart巨集,即可產製EXCEL圖表

Sub CreateRegressionChart()

    Dim ws As Worksheet
    Dim LastRow As Long
    Dim DataRange As Range
    Dim XRange As Range
    Dim YRange As Range
    Dim Regression As Object
    Dim RegressionEquation As String
    
    '
指定EXCEL表數據,放置之⌈工作表名稱
    Set ws = ThisWorkbook.Sheets("工作表1") '  
    

    ' 找出資料筆數之總數
    LastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
    
    ' 設定X和Y的範圍
    Set XRange = ws.Range("B2:B" & LastRow)        ' B欄為X軸

    Set YRange = ws.Range("C2:C" & LastRow)       ' C欄為Y
    
    ' 使用LINEST函數,進行迴歸分析
'    RegressionData = WorksheetFunction.LinEst(YRange, XRange, True, True)
    RegressionData = WorksheetFunction.LinEst(YRange, XRange, True, True)

    ' 提取斜率和截距
    Slope = RegressionData(1, 1)
    Intercept = RegressionData(1, 2)
    
    ' 在工作表中,顯示迴歸方程式

    ws.Range("E2").Value = "Regression Equation:"
    ws.Range("F2").Value = "Y = " & Slope & " * X + " & Intercept
    
    ' 繪製線性圖表
    Dim ChartObj As ChartObject
    Dim TrendlineChart As Chart
    
    ' 刪除現有的圖表
    For Each ChartObj In ws.ChartObjects
        ChartObj.Delete
    Next ChartObj
    
    ' 新增趨勢線圖表
    Set ChartObj = ws.ChartObjects.Add(Left:=100, Width:=375, Top:=75, Height:=225)
    Set TrendlineChart = ChartObj.Chart
    
    ' 添加散點圖
    With TrendlineChart
        .ChartType = xlXYScatter
        .SetSourceData Source:=ws.Range("B2:C" & LastRow)
        .HasTitle = True
        .ChartTitle.Text = "Regression Analysis"
        
        ' 添加趨勢線
        With .SeriesCollection.NewSeries
            .XValues = XRange
            .Values = YRange
            .Trendlines.Add(Type:=xlLinear).Select
            .Trendlines(1).DisplayEquation = True
            .Trendlines(1).DisplayRSquared = False
        End With
        
        ' 設定軸標籤
        .Axes(xlCategory, xlPrimary).HasTitle = True
        .Axes(xlCategory, xlPrimary).AxisTitle.Text = "X行銷費"
        .Axes(xlValue, xlPrimary).HasTitle = True
        .Axes(xlValue, xlPrimary).AxisTitle.Text = "Y銷售額"
    End With 
End Sub
 

2024年3月3日 星期日

數個m4a音檔,轉換成單一 MP3

 情境:手機之「語音備忘錄」(錄音程式),產出格式為m4a音檔,但想轉換成MP3音檔🎶

 📌需預先備妥轉換程式:  

💚(開放源碼)ffmpeg轉檔工具,支援跨平台系統

💚可先安裝好Chocolatey工具,直接於Windows命令提示模式下,執行安裝ffmpeg指令
choco install ffmpeg

💚安裝 ffmpeg工具後, 執行python m4a_to_mp3.py,可將單一m4a音檔 或多個m4a(需先將自己錄好的m4a音檔,預先改檔名成 file1.m4a 、file2.m4a、 file3.m4a、  ~,以利PYHTON程式做轉換) ,轉換成Mp3音樂檔案格式

💚解決方式:可使用Python程式(如下藍色部分,另存成m4a_to_mp3.py),將數個m4a檔(檔名自file1.m4a 、file2.m4a、系統會自動將所有file*.m4a檔合併起來),最後轉換成單一MP3音檔(Output.mp3)

import os

def convert_m4a_to_mp3(input_files, output_file):
    # 確認輸入來源之檔案,是否存在?
    for file in input_files:
        if not os.path.exists(file):
            print(f"來源檔案 '{file}' 不存在.")
            return False
    
    # 合併清單M4A檔案
    input_list_path = 'input_list.txt'
    with open(input_list_path, 'w') as f:
        for file in input_files:
            f.write(f"file '{file}'\n")
    
    try:
        os.system(f"ffmpeg -f concat -safe 0 -i {input_list_path} -c copy merged.m4a")
    except Exception as e:
        print(f"合併檔案時,發生錯誤: {e}")
        return False
    
    # 轉換為MP3格式
    try:
        os.system("ffmpeg -i merged.m4a -acodec libmp3lame -ab 256k -ar 44100 -y output.mp3")
    except Exception as e:
        print(f"轉換檔案時,發生錯誤: {e}")
        return False
    
    # 删除臨時交換檔案
    os.remove(input_list_path)
    os.remove("merged.m4a")
    
    print("合併 & 轉檔完成.")
    return True

if __name__ == "__main__":
    input_files = []
    output_file = "output.mp3"  # 輸出MP3檔案名稱
    file_index = 1
    while True:
        file_name = f"file{file_index}.m4a"
        if os.path.exists(file_name):
            input_files.append(file_name)
            file_index += 1
        else:
            break

    if len(input_files) == 0:
        print("未找到file1.m4a 聲檔,系統將合併file1.m4a file2.m4a ~ 依序載入到最後,並自動轉出成Output.mp3格式.")
    else:
        if convert_m4a_to_mp3(input_files, output_file):
            print(f"轉換檔案完成,輸出檔案名稱為 '{output_file}'")
 




Chocolatey 好用Windows套件,軟體安裝工具

Chocolatey ,好用Windows軟體指令方式,安裝工具套件


refreshenv 直接在命令提示模式下此指令,

可以無需重新開機,直接重載生效 Environment variables 環境變數。



參考套件:
https://community.chocolatey.org/packages