狠狠撸
Submit Search
骋补蝉ライフ?テ?モ20210715
?
0 likes
?
175 views
Hayato Ito
Follow
live demo
Read less
Read more
1 of 6
Download now
Download to read offline
More Related Content
骋补蝉ライフ?テ?モ20210715
1.
GASライブデモ 仕事を始めるときに必要なドキュメントのセットを自動作成する 2021/07/15
2.
自己绍介
3.
各种テンプレート
4.
スクリプト(を仕込んだシート)
5.
成果物
6.
サンプルコード function onOpen() { SpreadsheetApp.getActiveSpreadsheet().addMenu( 'スクリプト', [ { name:
'プロジェクトファイル作成君 ', functionName: 'setup' } ] ); } function setup() { Browser.msgBox('つくります!'); const ss = SpreadsheetApp.getActiveSpreadsheet().getSheetByName('設定'); const ids = ss.getRange('B1:B5').getValues(); const companyName = ids[0][0]; const folderId = ids[1][0]; const docId = ids[2][0]; const sheetId = ids[3][0]; const slideId = ids[4][0]; const rootFolder = DriveApp.getFolderById(folderId); const createdFolder = rootFolder.createFolder(companyName); const sourceDocFile = DriveApp.getFileById(docId); const newDocFile = sourceDocFile.makeCopy(companyName + '様議事録', createdFolder); const docObj = DocumentApp.openById(newDocFile.getId()); const body = docObj.getBody(); body.replaceText('@@会社名@@', companyName); docObj.saveAndClose(); const source狠狠撸File = DriveApp.getFileById(slideId); const new狠狠撸File = source狠狠撸File.makeCopy(companyName + '様提案書', createdFolder); const slideObj = 狠狠撸sApp.openById(new狠狠撸File.getId()); slideObj.replaceAllText('@@会社名@@', companyName); slideObj.saveAndClose(); const sourceSheetFile = DriveApp.getFileById(sheetId); const newSheetFile = sourceSheetFile.makeCopy(companyName + '様ガントチャート ', createdFolder); const sheetObj = SpreadsheetApp.openById(newSheetFile.getId()); const firstSheet = sheetObj.getSheets()[0]; firstSheet.getRange('P4').setValue(companyName); ss.getRange('B7').setValue(createdFolder.getUrl()); }
Download