テックメモ – ページ 37 – 自分用のメモです。内容が間違っていたり、作りかけで動作しないコードなどあるのでご注意ください。

2017-06-09

CodeIgniterでホームページの骨格作成２

DB使わずにファイルで管理するタイプ。頻繁に更新するようなら、サブメニューは自動でファイルを読み込んで自動で生成した方が楽になりそう。

*{
margin: 0;
padding: 0;
}

body{
color: rgb(51, 51, 51);
font-family: メイリオ, "Hiragino Kaku Gothic Pro", Meiryo, "ヒラギノ角ゴ Pro W3", "MS PGothic", "MS UI Gothic", Helvetica, Arial, sans-serif;
}

p{
line-height: 1.8em;
}

h2{
font-size: 110%;
border-bottom: 1px dotted #ccc;
margin-bottom: 15px;
}

#container{
margin: 0 auto;
width: 970px;
}

#header{
background-color:blue;
height: 150px;   
}

#main{
float: left;
height: 700px;
width: 74%;

}

#sub{
float: right;
height: 700px;
width: 24%;
border-left: 1px solid #E1E1E1;
}

#sub ul{
padding-left: 15px;
}

#sub ul li{
list-style-type: none;
padding: 0 0 5px 0;
}

#sub ul li a{
font-size: 85%;
text-decoration: none;
}

#sub ul li a:link{
color: #03C;
}

#sub ul li a:visited{
color: #639;
}

.content{
padding: 15px;
}

#sub ul li a:hover{
color: #CC3434;
text-decoration: underline;
}

#footer{
background-color:pink;
height: 75px; 
clear: both;  
}

margin: 0;

padding: 0;

}

body{

color: rgb(51, 51, 51);

font-family: メイリオ, "Hiragino Kaku Gothic Pro", Meiryo, "ヒラギノ角ゴ Pro W3", "MS PGothic", "MS UI Gothic", Helvetica, Arial, sans-serif;

}

line-height: 1.8em;

}

h2{

font-size: 110%;

border-bottom: 1px dotted #ccc;

margin-bottom: 15px;

}

#container{

margin: 0 auto;

width: 970px;

}

#header{

background-color:blue;

height: 150px;

}

#main{

float: left;

height: 700px;

width: 74%;

}

#sub{

float: right;

height: 700px;

width: 24%;

border-left: 1px solid #E1E1E1;

}

#sub ul{

padding-left: 15px;

}

#sub ul li{

list-style-type: none;

padding: 0 0 5px 0;

}

#sub ul li a{

font-size: 85%;

text-decoration: none;

}

#sub ul li a:link{

color: #03C;

}

#sub ul li a:visited{

color: #639;

}

.content{

padding: 15px;

}

#sub ul li a:hover{

color: #CC3434;

text-decoration: underline;

}

#footer{

background-color:pink;

height: 75px;

clear: both;

}

CSSだけRewrite除外する。

RewriteEngine on
RewriteCond $1 !^(index\.php|style.css)
RewriteRule ^(.*)$ /c/index.php/$1 [L]

RewriteEngine on

RewriteCond $1 !^(index\.php|style.css)

RewriteRule ^(.*)$ /c/index.php/$1 [L]

コントローラ（今回のクラス名は適当）

<?php

class Vba extends CI_Controller {

  public function page($page="1"){

    $val['url'] = "http://localhost/c/"; 
    $val['title'] = "タイトル"; 

    $this->load->view('templates/header', $val);
    $this->load->view('pages/' . $page, $val);
    $this->load->view('templates/footer', $val);

  }

}

<?php

class Vba extends CI_Controller {

public function page($page="1"){

$val['url'] = "http://localhost/c/";

$val['title'] = "タイトル";

$this->load->view('templates/header', $val);

$this->load->view('pages/' . $page, $val);

$this->load->view('templates/footer', $val);

}

ビュー

1.php

<h2>タイトル１</h2>
<p>本文が入ります。</p>

1 2	<h2>タイトル１</h2> <p>本文が入ります。</p>

2.php

<h2>タイトル２</h2>
<p>本文が入ります。</p>

1 2	<h2>タイトル２</h2> <p>本文が入ります。</p>

header.php

<!DOCTYPE html>
<html lang="ja">
<head>
<meta charset="utf-8">
<link rel="stylesheet" type="text/css" href="<?php echo $url; ?>style.css">
<title><?php echo $title; ?></title>
</head>
<body>

<div id="container">

<div id="header">
タイトル
</div>

<div id="main">
<div class="content">

<!DOCTYPE html>

<head>

</head>

<body>

タイトル

</div>

footer.php

</div><!-- content -->
</div><!-- main -->

<div id="sub">
<div class="content">

<ul>
<li><a href="<?php echo $url . "vba/page/1"; ?>">・サブメニュー１</a></li>
<li><a href="<?php echo $url . "vba/page/2"; ?>">・サブメニュー２</a></li>
</ul>

</div>
</div>

<div id="footer">
フッター
</div>

</div>

<script src="https://code.jquery.com/jquery-2.2.4.min.js" integrity="sha256-BbhdlvQf/xTY9gja0Dq3HiwQF8LaCRTXxZKRutelT44=" crossorigin="anonymous"></script>
</body>
</html>

</div>

</div>

<ul>

<li><a href="<?php echo $url . "vba/page/1"; ?>">・サブメニュー１</a></li>

<li><a href="<?php echo $url . "vba/page/2"; ?>">・サブメニュー２</a></li>

</ul>

</div>

フッター

</div>

</body>

</html>

2017-06-072017-06-07

CodeIgniterでホームページの骨格作成

実験として記事をSQLiteで取り出すタイプ。記事を作成してSQLiteに登録するのは面倒で、
実際に運用する場合、記事はファイルとした方が楽そう。

#container{
margin: 0 auto;
width: 970px;
}

#header{
background-color:green;
height: 100px;   
}

#left{
float: left;
height: 500px;
width: 80%;
background-color: grey;
}

#right{
float: left;
height: 500px;
width: 20%;
background-color:blue;
}

#footer{
background-color:pink;
height: 100px; 
clear: both;  
}

#container{

margin: 0 auto;

width: 970px;

}

#header{

background-color:green;

height: 100px;

}

#left{

float: left;

height: 500px;

width: 80%;

background-color: grey;

}

#right{

float: left;

height: 500px;

width: 20%;

background-color:blue;

}

#footer{

background-color:pink;

height: 100px;

clear: both;

}

RewriteEngine on
RewriteCond $1 !^(index\.php|style.css)
RewriteRule ^(.*)$ /c/index.php/$1 [L]

RewriteEngine on

RewriteCond $1 !^(index\.php|style.css)

RewriteRule ^(.*)$ /c/index.php/$1 [L]

コントローラ

<?php

/*

外部CSSを読み込む方法。

$this->load->helper('URL')
 を設定。

$config['base_url'] = 'http://localhost/c';
　を設定。
.htaccessでstyle.cssをrewriteから除外設定。

header.phpで
<link rel="stylesheet" type="text/css" href="<?php echo base_url(); ?>style.css">
とする。

config.phpを変更したくない場合

controller側から絶対パスを変数経由で渡してしまうの一つ方法(共通化できる)。
　あるいは、header.phpに直接書いてしまう。
何れにせよ.htaccessでrewriteからの除外は必要。

*/

class Vba extends CI_Controller {

    public function __construct(){
        parent::__construct();
        $this->load->model('Content');
    }

    public function page($page="1"){

        $val['url'] = "http://localhost/c/"; 
        $val['content'] = $this->Content->loadContent($page);

        $this->load->view('templates/header',$val);
        $this->load->view('pages/body',$val);
        $this->load->view('templates/footer');
        
    }
}

<?php

外部CSSを読み込む方法。

$this->load->helper('URL')

を設定。

$config['base_url'] = 'http://localhost/c';

　を設定。

.htaccessでstyle.cssをrewriteから除外設定。

header.phpで

とする。

config.phpを変更したくない場合

controller側から絶対パスを変数経由で渡してしまうの一つ方法(共通化できる)。

　あるいは、header.phpに直接書いてしまう。

何れにせよ.htaccessでrewriteからの除外は必要。

class Vba extends CI_Controller {

public function __construct(){

parent::__construct();

$this->load->model('Content');

}

public function page($page="1"){

$val['url'] = "http://localhost/c/";

$val['content'] = $this->Content->loadContent($page);

$this->load->view('templates/header',$val);

$this->load->view('pages/body',$val);

$this->load->view('templates/footer');

}

モデル

<?php

class Content extends CI_Model {

public function __construct()
{
        $this->load->database();
}

public function loadContent($i)
{
        if (empty($i))
        {
                $query = $this->db->get('tbl');
                return $query->result_array();
        }
        else
        {
                $query = $this->db->get_where('tbl', array('id'=>$i));
                return $query->result_array();
                //return $query->row_array();
        }

}

}

<?php

class Content extends CI_Model {

public function __construct()

{

$this->load->database();

}

public function loadContent($i)

{

if (empty($i))

{

$query = $this->db->get('tbl');

return $query->result_array();

}

else

{

$query = $this->db->get_where('tbl', array('id'=>$i));

return $query->result_array();

//return $query->row_array();

}

ビュー

<div id="container">
<div id="header">タイトル</div>
<div id="left">

<?php foreach($content as $c): ?>
<?php echo $c['article']; ?>
<?php endforeach; ?>

</div>
<div id="right">サイドバー</div>
<div id="footer">フッター</div>
</div>

<?php foreach($content as $c): ?>

<?php echo $c['article']; ?>

<?php endforeach; ?>

</div>

<div id="right">サイドバー</div>

</div>

<!DOCTYPE html>
<html lang="ja">
  <head>
    <meta charset="utf-8">
    <link rel="stylesheet" type="text/css" href="<?php echo $url; ?>style.css">
    <title>タイトル</title>
  </head>
  <body>

<!DOCTYPE html>

<head>

</head>

<body>

<script src="https://code.jquery.com/jquery-2.2.4.min.js" integrity="sha256-BbhdlvQf/xTY9gja0Dq3HiwQF8LaCRTXxZKRutelT44=" crossorigin="anonymous"></script>
  </body>
</html>

</body>

</html>

2017-06-012020-05-05

CodeIgniter + SQLite + mod_rewriteの使い方メモ

SQLiteメモ

~~DBへの作成、接続~~
~~sqlite3 xxx~~

~~情報確認~~
~~.schema~~

終了
~~.exit~~

~~指定できる型~~
~~TEXT~~
~~NUMERIC~~
~~INTEGER~~
~~REAL~~
~~NONE~~

~~キーワード~~

~~PRIMARY KEY、ROWID、AUTOINCREMENT~~

~~INTEGER PRIMARY KEYと設定しても自動で増加するが、以前使った値を再度使う。~~
~~INTEGER PRIMARY KEY AUTOINCREMENTとすると、以前の値を使わない。~~

~~create table xxx (id integer primary key autoincrement)~~
~~のような感じ。~~

~~NOT NULL、UNIQUE、DEFAULT、CHECK~~

~~テーブルの作成、削除は標準~~
~~create,drop等。~~

例)
~~create table news (~~
~~id integer not null primary key autoincrement,~~
~~title text not null,~~
~~slug text not null,~~
~~text text not null~~
);

xampp+SQLiteでの設定

~~php.iniの以下コメント外す~~
~~extension=php_sqlite3.dll~~

~~application\config\database.php~~
~~の以下を修正~~

~~‘database’ => APPPATH.’sqlite/db’,~~
~~‘dbdriver’ => ‘sqlite3’,~~

SQLiteのみ別記事へ

CodeIgniterの使い方(ユーザガイド参考)

コントローラ

application/controllers/pages.php
コントローラクラス名とファイル名が同じ。

ルーティングはこのような感じ。
/コントローラクラス/コントローラクラスメソッド/引数
例)
http://localhost/c/index.php/pages/view/news

定義はこのような感じ
class Pages extends CI_Controller {
public function view($page = ‘home’){}
}

CI_Controllerを継承しているので、
system/core/Controller.php
を利用できる。

テンプレート

application/views/templates/header.php

以下のような感じ。
<html>
<head>
<title>CodeIgniter Tutorial</title>
</head>
<body>
<h1><?php echo $title; ?></h1>

静的なページ

application/views/pages/
home.phpやabout.php等作成。

コントローラからの呼び出し

public function view($page = ‘home’)
{
if ( ! file_exists(APPPATH.’views/pages/’.$page.’.php’))
{
show_404();
}
$data[‘title’] = ucfirst($page); // 頭文字を大文字に
$this->load->view(‘templates/header’, $data);
$this->load->view(‘pages/’.$page, $data);
$this->load->view(‘templates/footer’, $data);
}

モデルの作成

application\models
News_model.phpを作成し、以下を記述

<?php
class News_model extends CI_Model {
public function __construct()
{
　　$this->load->database();
}
public function get_news($slug = FALSE)
{
if ($slug === FALSE)
{
$query = $this->db->get(‘news’);
return $query->result_array();
}
$query = $this->db->get_where(‘news’, array(‘slug’ => $slug));
return $query->row_array();
}
}

モデルを呼び出すためのコントローラ

<?php
class News extends CI_Controller {
public function __construct()
{
parent::__construct();
$this->load->model(‘news_model’); //モデルのロード
$this->load->helper(‘url_helper’);
}
public function index()
{
$data[‘news’] = $this->news_model->get_news();
//モデル->モデルメソッド
}
public function view($slug = NULL)
{
$data[‘news_item’] = $this->news_model->get_news($slug);
}
}

変数

コントロール内の$data[‘title’]のビュー内の$title

ルーティング

application/config/routes.php

$route[‘default_controller’] = ‘pages/view’;
default_controllerはURIに何もない場合、
コントローラ/メソッドになるがメソッドを省略するとindexを呼ぶ。

$route[‘(:any)’] = ‘news/$1’;
//このルーティングを使うと、
//http://localhost/c/index.php/create
//とアクセスすると、
//http://localhost/c/index.php/news/create
//実際は上記にアクセスしたことになる。

index.phpを消す。

httpd.confのmod_rewriteが有効かどうか確認。(通常有効)

ルートに.htaccessを作成。(localhost/c/.htaccess)

RewriteEngine on
RewriteCond $1 !^(index\.php|images|robots\.txt)
RewriteRule ^(.*)$ /c/index.php/$1 [L]
と記述。

.htaccess(mod_rewrite)について

RewriteEngine On
RewriteCond %{REQUEST_FILENAME} !-f
RewriteCond %{REQUEST_FILENAME} !-d
RewriteRule ^(.*)$ index.php/$1 [L]

RewriteCondは
RewriteRuleを実行するための条件。IF文のようなもの。

以下記述例。

RewriteCond %変数名(テスト文字列) 条件パターン(正規表現) [フラグ]
RewriteRule ここにRewriteRuleのURL書換＆転送設定を記述

フラグは何も記述しないとANDで、ORの場合[OR]と記述。
[OR]を使わずに空白行を入れてもOR扱い。
[NC]と記述すると大文字/小文字の区別をしない。
ふたつ同時の場合。[OR,NC]

WordPress等のmod_rewrite

<IfModule mod_rewrite.c>
RewriteEngine On
RewriteBase /

# Rewrite処理後にベースとなるURL
# 記述がないとhtaccessの設置ディレクトリが選択
# RewriteRuleが相対パスのみ適用される。

RewriteCond %{REQUEST_FILENAME} !-f

# %{REQUEST_FILENAME} が !-f だったという条件式。
# ! と -f であり、
# -f はファイルかどうか。! は真偽の反転。

RewriteCond %{REQUEST_FILENAME} !-d

# -d はディレクトリかどうか

RewriteRule . /index.php [L]

# URLが(.)だったら、/index.phpを参照。
# 全てのアクセスが/index.phpを参照ということ。
# [L]は最後という意味。

</IfModule>

フラグは
[NC] 大小区別無し
[R] リダイレクト
[R=301] リダイレクト

2017-06-012020-05-04

簿記本社工場会計

製造活動に関する勘定は通常本社だが、規模等により、
工場の会計を独立させること。

勘定範囲

本支店会計は本店支店ともにすべての勘定を使ったが、
本社工場会計は、本社から工場に移した勘定は本社では使わない。

製造に係る、材料、労務費、経費、仕掛品等を工場の帳簿に移す。
但し、製品は売るのが本社なので、工場か本社にある。（指示がある）

本社工場間取引

本社または工場だけの取引の場合、通常通りの仕訳。
問題は本社と工場にまたがる取引。

本社または工場だけの取引の場合、それぞれの帳簿だけに仕訳。
本社と工場にまたがる取引は両方で仕訳をおこなう。

例）
工員の賃金を本社で払う場合。現金は本社、賃金は工場に移して場合。

（本社）
工場元帳　１００　｜　現金　　　１００

（工場）
賃金　　　１００　｜　本社元帳　１００

ちなみに移してない場合

仕訳）
賃金　　　１００　｜　現金　　　１００

例）
材料、賃金、製造間接費、仕掛品、製品、本社元帳が工場に移動。

本社で材料１００購入、工場の倉庫で受入。

先ず帳簿が独立していない場合を考える。

仕訳）
材料　１００　｜　買掛金　１００

工場）
材料　　　１００　｜　本社元帳　１００

本社）
工場元帳　１００　｜　　買掛金　１００

例）
工場で材料１００消費。直接８０、間接２０。

工場）
仕掛品　　　８０　｜　材料　１００
製造間接費　２０　｜

例）
工場で労働力２００消費、直接１４０、間接６０

工場）
仕掛品　　１４０　｜　賃金　２００
製造間接費　６０　｜

例）
製品３００が完成した。

工場）
製品　３００　｜　仕掛品　３００

上記を５００で掛け販売した。

独立していない場合を考える。

仕訳）
売掛金　　５００　｜　売上　５００
売上原価　３００　｜　製品　３００

本社）
売掛金　　５００　｜　売上　　　５００
売上原価　３００　｜　工場元帳　３００

工場）
本社元帳　３００　｜　製品　　　３００

2017-06-012020-05-04

簿記直接(部分)原価計算

ここまでの学習は全部原価計算。

全部原価計算
├個別原価計算
├総合原価計算
└標準原価計算
それに対するのが、直接原価計算。（部分原価計算）

変動費と固定費に分ける。
変動費のみで変動製造原価を計算する。
固定製造原価は全て発生期間の費用とする。（固定は売れなくても原価となる）

損益計算書での違い

全部原価計算では、
売上高
△売上原価
＝売上総利益
△販売費及び一般管理費
＝営業利益

となるが、直接原価計算での損益計算書では下記となる。
売上から先ず変動費を全て引いて限界利益をだし、そこから固定費を全て引いて営業利益となる。

売上高
△変動売上原価
＝変動製造マージン
△変動販売費
＝貢献利益（限界利益）
△固定製造原価
△固定販売費及び一般管理費
＝営業利益

勘定連絡での違い

変動製造原価は仕掛品勘定へ振替えるが、固定製造原価はそのまま損益勘定へ振替える
固定製造原価は期間原価になると考える。

損益計算書作成

例）
・売上高　１５００００（５００＊３００）
・製造原価：直接材料費：変動費　２４０００（６０＊４００）
・製造原価：直接労務費：変動費　１６０００（４０＊４００）
・製造原価：製造間接費：変動費　２００００（５０＊４００）
・製造原価：製造間接費：固定費　３６０００（総額）
・販売費：変動費　　　７５００（２５＊３００）
・販売費：固定費　　　１５０００（総額）
・一般管理費：固定費　９０００（総額）

実績データ
・仕掛品：期首　０
・仕掛品：投入　４００
・仕掛品：期末　０
・仕掛品：完成　４００
・製品：期首　　０
・製品：投入　　（仕掛品完成イコール）
・製品：期末　　１００
・製品：販売　　３００

全部原価計算

損益計算書
・売上高　　　　　　　　１５００００
・売上原価　　　　　　　７２０００
・売上総利益　　　　　　７８０００
・販売費及び一般管理費　３１５００
・営業利益　　　　　　　４６５００

直接原価計算

損益計算書
・売上高　　　　　　　　１５００００
・変動売上原価　　　　　４５０００
・変動製造マージン　　　１０５０００
・変動販売費　　　　　　７５００
・貢献利益　　　　　　　９７５００
＜固定費＞
・固定製造原価　　　　　３６０００
・固定販売費
及び一般管理費　　　　　２４０００　６００００
・営業利益　　　　　　　　　　　　３７５００

固定費調整

直接原価計算では固定製造原価は全額期間費用となる。
全部原価計算では当期に販売された分だけ費用となる。

期末に仕掛品や製品の仕掛品（全部売れなかった）がある場合、
直接原価計算は原価が多くなり利益が少なくなる。

期首に仕掛品がある場合、
直接原価計算は原価が少なくなり利益が多くなる。

営業利益を直接原価計算、全部原価計算で一致させることを固定費調整といい、
全部の利益 = 直接の利益＋期末の仕掛固定－期首の仕掛固定

損益計算書
・売上高　　　　　　　　１５００００
・変動売上原価　　　　　４５０００
・変動製造マージン　　　１０５０００
・変動販売費　　　　　　７５００
・貢献利益　　　　　　　９７５００
＜固定費＞
・固定製造原価　　　　　３６０００
・固定販売費
及び一般管理費　　　　　２４０００　６００００
・営業利益　　　　　　　　　　　　３７５００
＜固定費調整＞
＋期末製品に含まれる固定製造原価　９０００
－期首製品に含まれる固定製造原価　０
・全部原価計算方式の営業利益　　　４６５００

短期利益計画・CVP分析

次年度の利益の計画のこと。
この計算のためには直接原価計算が必要で、そもそも
直接原価計算は利益計画に有効な方法。

売上ー変動費＝貢献利益
売上＝変動費＋貢献利益
変動費率＋貢献利益率＝１

つまり変動費率が分かれば売上に対して貢献利益が分かる。

CVP分析

・損益分岐点売上高
・目標営業利益達成する売上高
・目標営業利益率を達成する売上高
・安全余裕率（予想売上高　ー　損益分岐売上高　÷　予想売上高）
などが求められる。

損益分岐点とは、営業利益がゼロの点。（利益の合計が固定費と同じになるだけの売上）

例）
次年度　予想売上高　１５００００　（５００＊３００）
次年度　予想原価
変動費
・直接材料費　３００００　（１００＊３００）
・直接労務費　２４０００　（８０＊３００）
・製造間接費　２７０００　（９０＊３００）
・販売費　　　９０００　（３０＊３００）
固定費
・製造間接費　２６０００
・販売費　　　１４０００

１．損益分岐点売上高・販売数量。
２．目標営業利益１０００００に必要な売上高、販売量。
３．目標営業利益率１５％に必要な売上高、販売量。
４．安全余裕率
以上を求める。

先ず、簡易のPLを出す。

売上高　　１５００００　：　S
△変動費　９００００　：　０．６　＊　S
貢献利益　６００００　：　０．４　＊　S
△固定費　４００００
営業利益　０．４Sー４００００

１）
損益分岐点は
０．４Sー４００００＝０
０．４S＝＋４００００
S=４００００÷０．４
S=１０００００
損益分岐点売上高＝１０００００
１０００００÷５００＝２００
販売数量＝２００

２）
０．４Sー４００００＝１０００００
０．４S＝１０００００＋４００００
S=１４００００÷０．４
S=３５００００
３５０００÷５００＝７００

３）
０．４S－４００００＝０．１５S
０．４S－０．１５S＝４００００
０．２５S＝４００００÷０．２５S
S=１６００００
１６００００÷５００＝３２０

４）
（１５００００ー１０００００）÷１５００００＝３３．３３％

原価の固変分解

利益計画のために直接原価計算＋CVP分析が必要。
そのためまず原価を変動費と固定費に分ける必要があり、これを個変分解と言う。

費目別精査法
一つひとつ分解していく。

高低点法

例）月　｜　原価　｜　生産量
１月　２５９０　１４個　低点
２月　２７００　１６個
３月　２９７５　２０個
４月　３０２５　２１個
５月　３１６０　２４個
６月　３５５０　３０個　高点

（３５５０ー２５９０）　÷　（３０ー１４）　＝　９６０　÷　１６
これは、１６個生産量が増えたら、原価が９６０増えたということ。
９６０÷１６＝６０
変動しているの、これが１つあたりの変動費６０。

高点の６月で、３０＊６０＝１８００が変動費。
同じ６月の原価３５５０－１８００＝１７５０が固定費。

2017-06-01

VBA 塗りつぶし＆パターンを指定セル数分移動

Private Sub CommandButton1_Click()

For i = Selection(1).Row To Selection(Selection.Count).Row '選択範囲の行でループ

    For ii = 8 To 100
    
      If Cells(i, ii).Interior.Color = RGB(0, 0, 0) Then
      
          If ii - UserForm1.TextBox1.Value < 8 Then Exit For
          Cells(i, ii).Interior.ColorIndex = xlNone
          Cells(i, ii - UserForm1.TextBox1.Value).Interior.Color = RGB(0, 0, 0)
      
      End If
      
      If Cells(i, ii).Interior.Pattern = 15 Then
      
          If ii - UserForm1.TextBox1.Value < 8 Then Exit For
          Cells(i, ii).Interior.Pattern = xlPatternNone
          Cells(i, ii - UserForm1.TextBox1.Value).Interior.Pattern = 15
      
      End If
    
    Next ii

Next i

End Sub

Private Sub CommandButton2_Click()

For i = Selection(1).Row To Selection(Selection.Count).Row '選択範囲の行でループ

    For ii = 100 To 8 Step -1
    
      If Cells(i, ii).Interior.Color = RGB(0, 0, 0) Then
      
          If ii + UserForm1.TextBox1.Value > 100 Then Exit For
          Cells(i, ii).Interior.ColorIndex = xlNone
          Cells(i, ii + UserForm1.TextBox1.Value).Interior.Color = RGB(0, 0, 0)
      
      End If
      
      If Cells(i, ii).Interior.Pattern = 15 Then
      
          If ii + UserForm1.TextBox1.Value > 100 Then Exit For
          Cells(i, ii).Interior.Pattern = xlPatternNone
          Cells(i, ii + UserForm1.TextBox1.Value).Interior.Pattern = 15
      
      End If
    
    Next ii

Next i

End Sub

Private Sub CommandButton1_Click()

For i = Selection(1).Row To Selection(Selection.Count).Row '選択範囲の行でループ

For ii = 8 To 100

If Cells(i, ii).Interior.Color = RGB(0, 0, 0) Then

If ii - UserForm1.TextBox1.Value < 8 Then Exit For

Cells(i, ii).Interior.ColorIndex = xlNone

Cells(i, ii - UserForm1.TextBox1.Value).Interior.Color = RGB(0, 0, 0)

End If

If Cells(i, ii).Interior.Pattern = 15 Then

If ii - UserForm1.TextBox1.Value < 8 Then Exit For

Cells(i, ii).Interior.Pattern = xlPatternNone

Cells(i, ii - UserForm1.TextBox1.Value).Interior.Pattern = 15

End If

Next ii

Next i

End Sub

Private Sub CommandButton2_Click()

For i = Selection(1).Row To Selection(Selection.Count).Row '選択範囲の行でループ

For ii = 100 To 8 Step -1

If Cells(i, ii).Interior.Color = RGB(0, 0, 0) Then

If ii + UserForm1.TextBox1.Value > 100 Then Exit For

Cells(i, ii).Interior.ColorIndex = xlNone

Cells(i, ii + UserForm1.TextBox1.Value).Interior.Color = RGB(0, 0, 0)

End If

If Cells(i, ii).Interior.Pattern = 15 Then

If ii + UserForm1.TextBox1.Value > 100 Then Exit For

Cells(i, ii).Interior.Pattern = xlPatternNone

Cells(i, ii + UserForm1.TextBox1.Value).Interior.Pattern = 15

End If

Next ii

Next i

End Sub

2017-05-252020-05-04

商圏の人口把握

jSTAT MAPにて商圏の人口把握

https://jstatmap.e-stat.go.jp/gis/nstac/

最初に利用申請をするとメールで仮IDとパスワードが送られてくる。

左側のメニュー上段のプロットをクリック。
画面が変わるので、
地図をクリックを選び、新規グループ（基本など）を作成する。
画面が変わるので、
プロット名（本店など）を入力し、地図上をクリックし、登録。
必要ならそのまま追加もできる。

次に同メニューのエリアをクリック。
新規グループを追加（商圏など）し、フリー円を選択。
地図をクリック、ドラッグし範囲を指定したら
エリア名（１ｋｍなど）を入力して登録。
必要ならそのまま追加もできる。

次に同メニューの統計データをクリック。
H22国勢調査(小地域)→男女別人口総数及び世帯数→人口総数
を選択し、指標選択をクリック。
エリアの中の商圏を選択し、按分するを選択して、集計開始をクリック。

次に同メニューのレポートをクリック。
人口だけ知りたいのであれば、シンプルレポートをクリック。
さきほど作成した、男女別人口総数及び世帯数として表示されているので、
選択し、シンプルレポート作成をクリック。

リッチレポートの場合、上記で作業した統計データ作成まで不要。
（プロット、エリア、グラフが未作成でも実行できる）
新たに調査地点、半径を指定する。

プロットした情報を集計したい場合

会員情報などを地図上にプロットして、範囲内のデータ数を集計したい場合。

プロットメニューをクリック、ジオコーディングを選択してCSVをアップロードする。
左側のメニューで検索対象のレイヤーの上で右クリックして、プロット範囲検索／集計をクリックする。
円か多角形で範囲を選択して検索すると、対象の範囲内に存在するデータ数が得られる。

統計ＧＩＳにて商圏の人口把握

http://e-stat.go.jp/SG2/eStatFlex/

右上、統計表プリセットから、
平成２２年国勢調査集計単位別（人口）を選択し、マップに設定をクリック。
画面が変わるので、
左に表示されているデータを変更したい場合はフォルダアイコンをクリック。
（変更不要ならそのまま）
次に境界選択をクリックし、単一を選択して、距離を入力（１０００ｍなど）
マップ上をクリックすると範囲に接触する地域の情報が見られる。

2017-05-252024-05-03

Windows Explorer 設定

アップデート事に環境を調整するのが面倒なのでデフォルト基本
･登録されている拡張子は表示しない
･保護されたオペレーティングシステムファイルを表示しない
だけ外す｡

･リセットは､
プロパティ>カスタマイズ>フォルダの種類選ぶ
オプション>表示>フォルダをリセット>フォルダに適用

~~●オプション>表示>ナビゲーションウィンドウ~~

~~･すべてのフォルダを表示~~
~~･開いているフォルダまで展開~~
~~の2つにチェック｡~~

~~●オプション>表示>ファイルおよびフォルダー~~

~~･隠しファイル、隠しフォルダー、および隠しドライブを表示する~~
~~･別のプロセスでフォルダーウィンドウを開く~~
~~チェックする｡~~

~~･フォルダーとデスクトップの項目の説明をポップアップで表示する~~
~~･フォルダーのヒントにファイルサイズを表示する~~
~~･プレビューウィンドウでプレビューのハンドラーを表示する~~
~~･登録されている拡張子は表示しない~~
~~･保護されたオペレーティングシステムファイルを表示しない~~
~~･同期プロバイダーの通知を表示する~~
~~チェックを外す。~~

●表示を同じ種類のフォルダに適用

オプション＞表示＞フォルダーに適用
詳細表示(名前、作成日時、更新日時、アクセス日時、サイズ、属性)
として設定。

●フォルダの種類

フォルダ右クリック＞カスタマイズ
から確認できる。
・全般
・ドキュメント
・ピクチャ
・ミュージック
・ビデオ
が存在する。

●フォルダ･ファイルが更新されるタイミング

・作成日時
作成
コピー

・更新日時
作成
保存

・アクセス日時
作成
移動
コピー
保存

●マイコンピュータ以下のミュージックやピクチャなど削除

HKEY_LOCAL_MACHINE>SOFTWARE>Microsoft>Windows>CurrentVersion>Explorer>MyComputer>NameSpace
以下を消す。

3Dオブジェクト：{0DB7E03F-FC29-4DC6-9020-FF41B59E513A}
ダウンロード：{088e3905-0323-4b02-9826-5d99428e115f}
ダウンロード：{374DE290-123F-4565-9164-39C4925E467B}
ピクチャ：{24ad3ad4-a569-4530-98e1-ab02f9417aa8}
ピクチャ：{3ADD1653-EB32-4cb0-BBD7-DFA0ABB5ACCA}
ミュージック：{3dfdf296-dbec-4fb4-81d1-6a3438bcf4de}
ミュージック：{1CF1260C-4DD0-4ebb-811F-33C572699FDE}
ドキュメント：{d3162b92-9365-467a-956b-92703aca08af}
ドキュメント：{A8CDFF1C-4878-43be-B5FD-F8091C1C60D0}
ビデオ：{f86fa3ab-70d2-4fc7-9c99-fcbf05467f3a}
ビデオ：{A0953C92-50DC-43bf-BE83-3742FED03C9C}
デスクトップ：{B4BFCC3A-DB2C-424C-B029-7FE99A87C641}

●OneDrive、Creative Cloud Files、Dropbox非表示

HKEY_CURRENT_USER>Software>Classes>CLSID>
以下を修正。

OneDrive：{018D5C66-4533-4307-9B53-224DE2ED1FE6}
Creative Cloud Files：{0E270DAA-1BE6-48F2-AC49-4D4FA7552B34}
Dropbox：{E31EA727-12ED-4702-820C-4B6445F28E1A}
の
System.IsPinnedToNameSpaceTree
を0へ

・Regファイルの場合

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Classes\CLSID\{0E270DAA-1BE6-48F2-AC49-4D4FA7552B34}]
"System.IsPinnedToNameSpaceTree"=dword:00000000

[HKEY_CURRENT_USER\Software\Classes\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6}]
"System.IsPinnedToNameSpaceTree"=dword:00000000

[HKEY_CURRENT_USER\Software\Classes\CLSID\{04271989-C4D2-7DFD-3559-EB6A6AF3DF55}]
"System.IsPinnedToNameSpaceTree"=dword:00000000

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Classes\CLSID\{0E270DAA-1BE6-48F2-AC49-4D4FA7552B34}]

"System.IsPinnedToNameSpaceTree"=dword:00000000

[HKEY_CURRENT_USER\Software\Classes\CLSID\{018D5C66-4533-4307-9B53-224DE2ED1FE6}]

"System.IsPinnedToNameSpaceTree"=dword:00000000

[HKEY_CURRENT_USER\Software\Classes\CLSID\{04271989-C4D2-7DFD-3559-EB6A6AF3DF55}]

"System.IsPinnedToNameSpaceTree"=dword:00000000

ここでは、Creative Cloud FilesとOneDrive(Personal+Business)を非表示にしている。

●CLSID調べ方①

Explorerで開いてアドレスバーから右クリック>住所をコピー

●CLSID調べ方②

HKEY_CURRENT_USER\Software\Classes\CLSID
以下にあるCLSIDがどこを指しているか確認する場合、
shell:::{}
ファイル名を指定して実行すれば確認できる。

●AutoHotkey 自分用ホームフォルダ作成

Runで対象フォルダを指定する｡
sc07B & e::Run “G:\Dropbox\Home”

対象フォルダの中で特殊フォルダのショートカットを作成する場合
explorer shell:MyComputerFolder
explorer shell:::{20D04FE0-3AEA-1069-A2D8-08002B30309D}

●Explorer(PC)からScanSnap Folderを削除

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\MyComputer\NameSpace\
{591C1901-C0DA-4776-8450-F9806F6E9687}
を適当にリネーム

レジストリ

・HKEY_CURRENT_USER(HKCU)：ログインユーザの設定
・HKEY_LOCAL_MACHINE(HKLM)：全ユーザの設定/規定の設定
・HKEY_CLASSES_ROOT(HKCR)：コンピュータが使う設定
・HKEY_USERS：ユーザに関する設定
・HKEY_CURRENT_CONFIG：起動時に読み込まれる設定

上３つは似た設定が多く、通常、HKCUの方が優先される。
HKLMでは再起動が必要だが、HKCUではログオン/オフ(AutoHotkeyなど)

HKLMはなるべく変更しない。

HKCRは、
HKEY_CURRENT_USER\Software\Classes
と
HKEY_LOCAL_MACHINE\SOFTWARE\Classes
を合わせたもの。ここを直接編集する必要はない模様。

・右クリックメニューを消す場合

reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\InputDirectorShellIntegration
reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\PDFelement.ContextMenu
reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\DropboxExt

reg delete HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\DropboxExt
reg delete HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\InputDirectorShellIntegration

reg delete HKLM\SOFTWARE\Classes\Directory\background\shellex\ContextMenuHandlers\DropboxExt

reg delete HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\DropboxExt
reg delete "HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\ESET Security Shell"
reg delete HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\NvAppShExt

reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\InputDirectorShellIntegration

reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\PDFelement.ContextMenu

reg delete HKLM\SOFTWARE\Classes\*\shellex\ContextMenuHandlers\DropboxExt

reg delete HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\DropboxExt

reg delete HKLM\SOFTWARE\Classes\Directory\shellex\ContextMenuHandlers\InputDirectorShellIntegration

reg delete HKLM\SOFTWARE\Classes\Directory\background\shellex\ContextMenuHandlers\DropboxExt

reg delete HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\DropboxExt

reg delete "HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\ESET Security Shell"

reg delete HKLM\SOFTWARE\Classes\lnkfile\shellex\ContextMenuHandlers\NvAppShExt

2017-05-242020-05-04

簿記標準(総合)原価計算

個別原価計算、総合原価計算は実際原価計算の範囲。
予定計算も実際原価計算に含まれる計算方法。

標準原価計算は目標となる原価。
ただの概算予定ではなく、理想や統計などの根拠がある数字。

見積と標準原価の違い

見積は今現在の実力で計算する。売価設定に使ったり、リスクヘッジも考慮。
標準原価は目標となるため、原価を最小値で設定する。

実際原価計算との比較は必要。財務上では実際原価計算を利用する。
実際原価と比較するときは、「標準」ー「実際」となる。

原価標準の設定

期首に原価標準を決める。製品一つあたりの目標原価のことであり、
直接材料費、直接労務費、製造間接費のそれぞれ設定する。

直接材料　＝　標準単価　×　標準消費量
直接労務　＝　標準賃率　×　標準作業時間
製造間接費　＝　標準配賦率　×　標準操業度

標準操業度とは配賦基準のことで直接作業時間など。

標準原価カードにまとめる。

直接材料費　１２５＊８＝１０００
直接労務費　１５０＊１０＝１５００
製造間接費　２５０＊１０＝２５００
一個あたりの標準製造原価＝５０００
（一個あたり５０００で作るのが目標。）

標準原価の計算

完成品原価

原価標準　×　完成品数量　＝　完成品原価

月末仕掛品原価

原価標準　×　月末仕掛品数量　＝　月末仕掛品原価
（直接労務費、製造間接費は加工費なので換算数量を使う）

例）
生産データ
・月初仕掛品　４０（０．５）
・当月投入　２４０
・月末仕掛品　８０（０．５）
・完成品　２００

標準原価
・直接材料費　１２５×８＝１０００
・直接労務費　１５０×１０＝１５００
・製造間接費　２５０×１０＝２５００
・合計　５０００

完成品原価　１００００００
月末仕掛品原価　２４００００
月初仕掛品原価　１２００００

仕掛品勘定への記入

パーシャルプランとシングルプランがある。

仕掛品の当月投入以外は全て標準原価で記入し、
仕掛品の当月投入を標準原価にするか実際原価にするかの違い。

パーシャルプラン
当月投入を実際原価（原価差異は仕掛品勘定）

例）
生産データ
・月初仕掛品　４０　（０．５）
・当月投入　　２４０
・月末仕掛品　８０　（０．５）
・完成品　　　２００

標準原価
・直接材料費　１２５＊８＝１０００
・直接労務費　１５０＊１０＝１５００
・製造間接費　２５０＊１０＝２５００
・合計　５０００

・実際直接材料費　２７４３２０（１２７＊２１６０）
・実際直接労務費　２９０４００（１６５＊１７６０）
・実際製造間接費　５９４０００

仕掛品勘定への記入

仕訳）
前月繰越　　　　標準　｜　製品　　　標準
材料　　　　　　実際　｜　次月繰越　標準
賃金　　　　　　実際　｜　原価差異
製造間接費　　　実際　｜

仕訳）
前月繰越　　１２００００　｜　製品　　　１００００００
材料　　　　２７４３２０　｜　次月繰越　２４００００
賃金　　　　２９０４００　｜　原価差異　３８７２０
製造間接費　５９４０００　｜
＿　　　　　１２７８７２０　　　　　　　　１２７８７２０

シングルプラン

当月投入を標準原価で記入。仕掛品勘定は全て標準原価で記入。
原価差異は、材料勘定、賃金勘定、製造間接費勘定で計算される。

原価差異分析

パーシャルプランの場合、
原価差異を要素別（材料、労務、経費）に分ける必要がある。

標準原価と実際原価の差異は当月投入で発生するので、
当月投入で、標準と実際の金額を計算する。（加工費は労務費、製造間接費を別に計算する）

例）
前項と同じ内容。

直接材料費差異　２４００００　ー　２７４３２０　＝　ー３４３２０
直接労務費差異　３３００００　ー　２９０４００　＝　３９６００
製造間接費差異　５５００００　ー　５９４０００　＝　ー４４０００

直接材料費差異

直接材料費差異は、
価格差異と数量差異に分けられる。

直接労務費差異

直接労務費差異は、
賃率差異
時間差異
に分けられる。

製造間接費差異

製造間接費差異は、
・予算差異
・操業度差異
・能率差異（変動、固定）
に分けられる。

能率差異は、変動費能率差異と固定費能率差異に分ける場合もある。（ひじきで覚える）

例）

※操業度＝作業時間

標準間接費
￥２５０／時間　×　１０時間　＝　￥２５００

製造間接費の実際発生額
５９４０００

実際直接作業時間
１７６０

製造間接費の予算
４６２５００　（変動費率　１００，固定費予算　２７７５００）
※予算＝基準

基準操業度
１８５０

生産データ
・月初仕掛品　４０　（０．５）
・当月投入　　２４０
・月末仕掛品　８０　（０．５）
・完成品　　　２００

2017-05-222020-05-06

Slypheedのメールをコマンドで作成

添付やアドレス等をバッチで設定して起動。あとFOR文のメモ有り。

rem 通常forに近い処理

for /L %%i in (1,1,10) do (
echo %%i
)
pause

rem パスを渡す処理

rem カレントディレクトリのbat一覧を取得
for %%i in (C:\xxx\xxx\*.bat) do (
echo %%i
)
pause

rem 上記と同じだが変数iに入る時フルパスで入らない。

rem カレントディレクトリのbat一覧を取得
for %%i in (*.bat) do (
echo %%i
)
pause

rem Slypheedでメール自動作成。添付を直接指定

Sylpheed-3.5.1\sylpheed.exe --compose "mail@xxx.com,mail@xxx.com?subject=xxx&body=xxx" --attach "%~dp0Attach\a.pdf" "%~dp0Attach\b.pdf"

rem Slypheedでメール自動作成。forで指定

@echo off
setlocal enabledelayedexpansion

for %%i in (%~dp0Attach\*.pdf) do (
set var="%%i" !var!
)

Sylpheed-3.5.1\sylpheed.exe --compose "mail@xxx.com,mail@xxx.com?subject=xxx&body=xxx" --attach %var%

rem 通常forに近い処理

for /L %%i in (1,1,10) do (

echo %%i

)

pause

rem パスを渡す処理

rem カレントディレクトリのbat一覧を取得

for %%i in (C:\xxx\xxx\*.bat) do (

echo %%i

)

pause

rem 上記と同じだが変数iに入る時フルパスで入らない。

rem カレントディレクトリのbat一覧を取得

for %%i in (*.bat) do (

echo %%i

)

pause

rem Slypheedでメール自動作成。添付を直接指定

Sylpheed-3.5.1\sylpheed.exe --compose "mail@xxx.com,mail@xxx.com?subject=xxx&body=xxx" --attach "%~dp0Attach\a.pdf" "%~dp0Attach\b.pdf"

rem Slypheedでメール自動作成。forで指定

@echo off

setlocal enabledelayedexpansion

for %%i in (%~dp0Attach\*.pdf) do (

set var="%%i" !var!

)

Sylpheed-3.5.1\sylpheed.exe --compose "mail@xxx.com,mail@xxx.com?subject=xxx&body=xxx" --attach %var%

ちょっと修正。変数にまとめた。
bodyの中で改行したかったけど、改行コードもダメだし、一旦保留。
あとconfigの設定も指定しないとダメだった。

@echo off
setlocal enabledelayedexpansion
for %%i in (%~dp0Attach\*.pdf) do (
  set attach="%%i" !attach!
)

REM 送信先
set address=^
mail@xxx.com,mail@xxx.jp

set subject=xxx
set body=xxx
Sylpheed-3.5.1\sylpheed.exe --compose "%address%?subject=%subject%&body=%body%" --attach %attach% --configdir %~dp0Sylpheed-3.5.1\config

@echo off

setlocal enabledelayedexpansion

for %%i in (%~dp0Attach\*.pdf) do (

set attach="%%i" !attach!

)

REM 送信先

set address=^

mail@xxx.com,mail@xxx.jp

set subject=xxx

set body=xxx

Sylpheed-3.5.1\sylpheed.exe --compose "%address%?subject=%subject%&body=%body%" --attach %attach% --configdir %~dp0Sylpheed-3.5.1\config

相対パスのショートカットを作成

%windir%\System32\rundll32.exe url.dll,FileProtocolHandler “Sylpheed-3.5.1\sylpheed.exe”
として作業フォルダーを空白にする。