Excel

ExcelVBAでカレンダーコントロールを自作する【更新記事】(簡単に再現できます)

VBAを使ってエクセルで使えるカレンダーコントロールを作ります。ボタンの配置などを含めてすべてコードに落とし込んでいるためコピーペーストのみで再現できます。そのため5分もかからず使えるようになります。

Excelの折れ線グラフに矢印を追加したい。そうだ二つのグラフを重ねることにしよう。【VBA使用】

二つのグラフを重ねることによってExcelの折れ線グラフに矢印を追加する方法です。

Excelのグラフに3軸目を追加したい。そうだ二つのグラフを重ねることにしよう。【VBA使用】

二つのグラフを重ねることによってグラフに3軸目を追加する方法です。

Excelで折れ線グラフを棒グラフの後ろに描きたい。そうだ二つのグラフを重ねることにしよう。【VBA使用】

二つのグラフを重ねることによってExcelで折れ線グラフを棒グラフの後ろに描く方法です。

Excel VBAで補間

前方にも後方にも線形補間を適応したかった。 PythonのPandasを使って思うようにできなかったのでExcelを用いることにした。 以下は個人的メモです。 Sub 補間() Dim count_ As Integer count_ = Selection.count Selection.Item(1).Activate Dim a As Integ…

【Excel】【VBA】行列を入れ替える

Dim last_row As Integer last_row = Cells(Rows.Count, 1).End(xlUp).Row Range("A1").Select Selection.CurrentRegion.Select Selection.Copy Cells(last_row + 1, 1).PasteSpecial Transpose:=True Rows("1:" & last_row).Delete Shift:=xlUp

Excel印刷の各種設定

Application.PrintCommunication = False With ActiveSheet.PageSetup '縦方向 .Orientation = xlLandscape 'シートを1ページに印刷 .Zoom = False .FitToPagesWide = 1 .FitToPagesTall = 1 End With Application.PrintCommunication = True ActiveWindow.S…

VBAでグラフの軸の調整やプロットエリア塗りつぶしなど

touch-sp.hatenablog.com 上記記事よりさらに細かい設定を加えました。 '折れ線グラフを描く ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Dim graphdata As Range Set graphdata = Range("A1").CurrentRegion ActiveSheet.Shapes.Ad…

VBAで折れ線グラフの線やマーカーを変更する

ActiveSheet.ChartObjects("graph").Activate ActiveChart.FullSeriesCollection(1).Select 'マーカーを消す(.MarkerStyle = -4142も同じ) With Selection .MarkerStyle = xlNone End With 'マーカーの型とサイズを指定 With Selection .MarkerStyle = 8 .…

ExcelからWord内の単語を置換する

Excel VBAを使ってWord内の単語を置換する方法です。

Excelのコマンドボタンの右クリックを有効にする方法

以下の二つは共存可能。 Private Sub CommandButton1_Click() MsgBox ("左クリック") End Sub Private Sub CommandButton1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If Button = 2 Then MsgBox ("…

ExcelVBAでカレンダーコントロールを自作する

VBAを使ってエクセルで使えるカレンダーコントロールを作ります。ボタンの配置などを含めてすべてコードに落とし込んでいるためコピーペーストのみで再現できます。そのため5分もかからず使えるようになります。