3
票
Accepted
Excel でフィルター状態を維持し、可視セルのみ貼り付けたい
フィルター状態は関係ありません。Excelのセルのコピーに関する仕様です。
ExcelはRangeという単位で処理されています。Rangeは歯抜けのない四角形の領域となります。
今回、コピー元は2行1列のRangeとなります。貼り付け先は飛び地になっているので1行1列のRangeが2つ選択された状態となります。
ExcelではRangeの行列が同じサイズであればそのまま貼り付けられますが、...
1
票
Accepted
Excelのマクロを使っているのですがmenuの中のセルをクリックしてもエクセルのタブがひらけません
SubbAddressの行を下記のように書き直してください。
'修正前
SubAddress:=Worksheets(i).Name & "!A1", _
'修正後
SubAddress:="'" & Worksheets(i).Name & "'!A1", _
シート名が数式などを含む場合には、...
1
票
Accepted
1
票
Accepted
Excelデータで条件に合致しないデータを除外して取り込む方法
import pandas as pd
df = pd.read_excel('test.xlsx')
# 必須項目
required = ['No', 'Name', 'type']
# Model: 規定の文字列
models = ['N-1', 'N-2']
idx = df[required].notna().all(axis=1)
dfx = df[idx].query('No &...
1
票
Accepted
1
票
エクセルで1つのセルの中に異なる色付きで入力された文字列を自動で分割して新しいセルに代入したい
Range.Charactersプロパティで1文字ずつフォントを取得できますので、素直にループしながら判定することで目的を達成できます。
サンプルコード
Sub ボタン1_Click()
Dim cell As range
Set cell = range("A1")
Dim color As Integer '現在のカラーインデックス
Dim ...
1
票
Accepted
AWS CloudWatch Logs のログの成形ができない
AWSCLI と jq コマンドが利用可能であれば 1~3 行で済むのですが、Python + CSV モジュールの場合は(一例として)以下の様になります。
※ 念の為、csv.QUOTE_NONNUMERIC を指定しています
import csv
import datetime
import re
now = datetime.datetime.now()
out_filename = '...
1
票
AWS CloudWatch Logs のログの成形ができない
ライブラリ:標準ライブラリのみ(pandas, numpy等は使えない)
また、より効率の良いやり方等があればそちらについても教えていただけるとありがたいです。
ライブラリに制約がある環境下ですと、VBAと大差のない泥くさいコードにならざるを得ないと思われます。最終的にExcelに読み込むのでしたら、最初からExcelで処理することをお勧めします。...
1
票
VBA(Excel)の処理速度について
Excelのセルの操作はCPUとメモリへの負荷が大きいオペレーションですので、どうしても重くなりがちです。小手先のテクニックとしては「再計算を手動にする」「画面の再描画をオフにする」などがありますが、効果は限られます。本質的な解決としては、Excelのセルにデータを書き出す前に、不要な行の削除などできる限りの処理を行っておくべきです。
方法としては、...
1
票
Accepted
VBA 高速化について
regionArr には範囲のセルの内容が2次元配列として入ります。
内容を確認してみてください。
Dim nRow As Long
Dim nColumn As Long
For nRow = LBound(regionArr, 1) To UBound(regionArr, 1)
For nColumn = LBound(regionArr, 2) To UBound(...
1
票
Excel VBA でOutlookのメールを作成するのですが、実行後にメールの画面がアクティブにならないことがあるので、 アクティブ(最前面)にする方法を教えてください。
私も上記の修正では前面に来ないことが出てきました。
そこで、以下の通り書き換えて試しています。
修正前:
.GetInspector.Activate
修正後:
.GetInspector.Display (False)
1
票
Excel VBA でOutlookのメールを作成するのですが、実行後にメールの画面がアクティブにならないことがあるので、 アクティブ(最前面)にする方法を教えてください。
私も同じことをやりたくてここにたどり着きました。
.Display
と
End With
の間に
.GetInspector.Activate
という1行を入れるとできました。
Only top scored, non community-wiki answers of a minimum length are eligible