HeppokoSeEmo

HeppokoSeEmo

記事一覧

Googleデータのエクスポート

重宝していたGoogleフォトの容量が制限されるのを機に、フォトの一括ダウンロードを決行。 通常は、写真単位やアルバム単位だけれど、一括でもダウンロードできることが判…

HeppokoSeEmo
3年前

【VBA】外部リンクカット

Public Sub linkCut(usewb As Workbook, useshName As String, cutDir As String, cutfileName As String) ' Debug.Print cutDir & "[" & cutfileName & "]" usewb.S…

HeppokoSeEmo
3年前

【VBA】左右列、最下行の検索ツール

Public Function leftEndCol(sheetName As Worksheet, useRow As Long) leftEndCol = sheetName.Cells(useRow, Columns.Count).End(xlToLeft).Column If Err.Number …

HeppokoSeEmo
3年前

【GAS】Gメールをスプレッドシートに転記

function mailGet() { var fetchData = (str, pre) => { var reg = new RegExp(pre + '\\s.*?\\s', 'g'); try { var data = str.match(reg)[0] .replace…

HeppokoSeEmo
3年前
1

Googleデータのエクスポート

重宝していたGoogleフォトの容量が制限されるのを機に、フォトの一括ダウンロードを決行。

通常は、写真単位やアルバム単位だけれど、一括でもダウンロードできることが判明(*容量が多ければ分割になるんだけどね)

エクスポートのURLは下記の通り。

写真以外もエクスポートできるのね!

https://takeout.google.com/

【VBA】外部リンクカット

Public Sub linkCut(usewb As Workbook, useshName As String, cutDir As String, cutfileName As String)
' Debug.Print cutDir & "[" & cutfileName & "]"
usewb.Sheets(useshName).Cells.Replace What:=cut

もっとみる

【VBA】左右列、最下行の検索ツール

Public Function leftEndCol(sheetName As Worksheet, useRow As Long)
leftEndCol = sheetName.Cells(useRow, Columns.Count).End(xlToLeft).Column
If Err.Number > 0 Then
leftEndCol = 0: Err.Clea

もっとみる

【GAS】Gメールをスプレッドシートに転記

function mailGet() {

var fetchData = (str, pre) => {
var reg = new RegExp(pre + '\\s.*?\\s', 'g');
try {
var data = str.match(reg)[0]
.replace(pre, '')
.replace(' ', '');
r

もっとみる