コミュ障だから明日が僕らをよんだって返事もろくにしなかった

何かを創る人に憧れたからブログをはじめたんだと思うよ

夜も更けてまいりました虹を作る時間です

エクセルのシートを虹色にする

最近、エクセルと言われるエクを使ってセルを動かす事務作業的なことをよく行うので、明日使いものにならないVBA講座をやっていこうと思います。

見出しの通りエクセルのシートをレインボーにするだけのプログラムをつくります。
シートって下の方にあるタブメニュー的やつね。これができることで実務的メリットは一切ないです。実務的な講座とかは明日仕事で使えるエクセルテクニックみたいな本を買ってね。僕のやつは、明日仕事で使うと上司から殴られるタイプのエクセル講座だから…。

それでは作っていきます

こんなのつくっていきます。
f:id:andron:20170208230356p:plain

ソースコード

Sub niji()
Dim NewWorkSheet As Worksheet
Dim rainbow(7) As Integer
rainbow(1) = 30 '赤
rainbow(2) = 46 '橙
rainbow(3) = 27 '黄
rainbow(4) = 10 '緑
rainbow(5) = 28 '水
rainbow(6) = 41 '青
rainbow(7) = 13 '紫

For i = 1 To 7
  Set NewWorkSheet = Worksheets.Add()
  NewWorkSheet.Tab.ColorIndex = rainbow(i)
Next

End Sub

いろんなVBA講座見てみたけど、僕が実現したい機能については基本調べてもないんですよね。
みんなもっと意味分かんないプログラムをつくろうよ!
オフィスソフトしか入ってないつまらない環境でもVBAはできるんだよ。

ボブなんてどうでもいいんだ

Bob is nothing

僕好みの哲学的な話を垂れ流すWebサービスを見つけてしまったので紹介いたします。みなさん英語はできますか?読める読めないに関わらず紹介します。

そう、ここは僕のブログだから…。



サイトはこちらになります
http://www.bobisnothing.com/
f:id:andron:20170320181205p:plain

なんと、ボブとチャットができます。
それ以上のことはわからないので残りは皆さんで調べてください。

なぜなら僕ができることは何もないから……

月曜日がきたので…

月曜日という瞬間

時計の針がてっぺんに来てしまった。
日付が変わったのだ。

もう過去の曜日は戻ってこない。そう、今は……。


そんなわけでなにかつくります

月曜日が来てしまったのでProcessingというお絵描きプログラミングツールを何かを作っていこうと思います。

Processing
Processing(プロセシング)は、キャセイ・レアス(英語版)(Casey Reas)とベンジャミン・フライ(英語版)(Benjamin Fry)によるオープンソースプロジェクトであり、かつてはMITメディアラボで開発されていた。電子アートとビジュアルデザインのためのプログラミング言語であり、統合開発環境である。


公式
Processing.org



毎度のことながら月曜日が来たからを理由に何か作るのは意味不明すぎますが、こんなのつくりました。
f:id:andron:20170408162357g:plain

日曜日が右に行って月曜日が左に戻ってくるやつ作りました。需要とか知りません。月曜日が来たという絶望が僕にこのような衝動をかりたてさせるのです(?)。


ソースコード

float x = 0;
float x2 = 300;
String date1 = "Monday";
String date2 = "Sunday";

void setup(){
  size(300, 150);
  background (127);
}

void draw(){
  background (127);
  noStroke();
  fill(255);
   
  noStroke();
  text(date2, x, 50);
  x+=1;

  if (x >= 300) {
    text(date1, x2, 50);
    x2 -= 1;
    if(x2 <= 120 ){
      text(date1, 120, 50);
    }
  }
  
}


うん、適当に作りすぎですね。
そんな適当な感じに日曜日を過ごしていたら、月曜日ですよ。

今日も一日頑張っていきましょう。