Archive for the ‘Office’ Category

ブック パス フルパス ファイル名

土曜日, 2月 8th, 2020
' ブックのフォルダまでのパス
msgbox ThisWorkbook.Path

' ブックのファイル名までのパス
msgbox ThisWorkbook.FullName

Office365 ライセンス 削除 コマンド

水曜日, 10月 16th, 2019

Office 完全 アンインストール サポート ツール

月曜日, 9月 30th, 2019

●Office アンインストール サポート ツール
オプション2

●手動でアンインストール
1.インストールの種類(クイック/MSI/ストアアプリ)を特定
2.それぞれの手順でアンインストール

●Easy Fix ツール(015CTRRemove)
プログラムのアンインストールでは完全にアンインストールできず
・スタートメニューに残る
・別バージョンをインストールできない
・アンインストールしたはずのOfficeがなぜか起動する

●32ビット版のインストール
その他のインストール オプション

メール 効率

金曜日, 9月 27th, 2019

●メールをワンクリックで移動
ホーム>クイック操作に登録

●定型メールをワンクリック作成
ホーム>クイック操作>新規作成>メッセージの作成

●あいさつの始まりと〆は署名に登録
いつもお世話になっております。〇〇です。
よろしくお願い致します。

●ショートカット作成
mailto:xxx@xxx

よく使う単語やフレーズは「単語登録」

 

outlook 連絡先 移行

木曜日, 9月 26th, 2019

outlook html テキスト 形式 設定

水曜日, 9月 18th, 2019

●設定を変更して新規はすべてのその設定で作成
ファイル>オプション>メール>メッセージの作成:次の形式でメッセージを作成する>
HTML形式/リッチ テキスト形式/テキスト形式

●今書いてるメールだけ形式を変更
書式設定>HTML/テキスト/リッチ テキスト

置換

火曜日, 9月 3rd, 2019
Const str削除文字列 As String = "削除文字列"

    Selection.Replace What:=str削除文字列, Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
構文  Object.Replace(What, Replacement, LookAt, SearchOrder, MatchCase, MatchByte)

 設定項目    内容
 Object      Rangeオブジェクト
 What       検索するデータを指定します [省略不可]
 Replacement 検索したデータを置き換える文字列を指定します [省略不可]
 LookAt     完全に同一なセルだけを検索(xlWhole)、
             一部分でも一致するセルの検索(xlPart)[省略可能]
 SeachOrder 検索方向を指定します。列方向に検索する(xlByColumns)、
             行方向に検索する(xlByRows)[省略可能]
 MatchCase  大文字と小文字を区別する(True)、区別しない(False)[省略可能]
 MatchByte  半角と全角を区別する(True)、区別しない(False)[省略可能]

replaceFormat 検索条件に一致するセルの書式を設定するときにTrueを設定

 

関数 逆順

火曜日, 8月 27th, 2019
Function 逆順(単セル As Range)
    
    Dim i As Integer
    If 単セル.Count = 1 Then
        For i = Len(単セル) To 1 Step -1
            逆順 = 逆順 & Mid(単セル, i, 1)
        Next i
    Else
        逆順 = "引数は1つのセルを選んでね"
    End If
    
End Function

Excel 標準フォント Meiryo UI 9pt

日曜日, 8月 25th, 2019

標準フォント
2013:MS Pゴシック
2016:遊ゴシック

ブックで使われる標準フォントはブックごとに設定(記録)されているので新規作成分から反映

ファイル>オプション>基本設定>新しいブックの作成時
次を規定のフォントとして使用:Meiryo UI
フォントサイズ:9

ただしオートシェイプやグラフ内の文字には反映されない→テンプレートで対応?

行全体EntireRow

日曜日, 8月 25th, 2019
Sub r折り返し()

    If ActiveCell.WrapText = False Then
        Selection.WrapText = True
        Selection.EntireRow.AutoFit
    Else
        Selection.WrapText = False
    End If

End Sub