<?xml version="1.0" encoding="UTF-8"?>
<!-- generator="FeedCreator 1.8" -->
<?xml-stylesheet href="https://www.garamx.com/dokuwiki/lib/exe/css.php?s=feed" type="text/css"?>
<rdf:RDF
    xmlns="http://purl.org/rss/1.0/"
    xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
    xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
    xmlns:dc="http://purl.org/dc/elements/1.1/">
    <channel rdf:about="https://www.garamx.com/dokuwiki/feed.php">
        <title>GaramX vba</title>
        <description></description>
        <link>https://www.garamx.com/dokuwiki/</link>
        <image rdf:resource="https://www.garamx.com/dokuwiki/lib/tpl/darkblue/images/favicon.ico" />
       <dc:date>2026-05-06T13:44:52+00:00</dc:date>
        <items>
            <rdf:Seq>
                <rdf:li rdf:resource="https://www.garamx.com/dokuwiki/doku.php?id=vba:home&amp;rev=1744711518&amp;do=diff"/>
            </rdf:Seq>
        </items>
    </channel>
    <image rdf:about="https://www.garamx.com/dokuwiki/lib/tpl/darkblue/images/favicon.ico">
        <title>GaramX</title>
        <link>https://www.garamx.com/dokuwiki/</link>
        <url>https://www.garamx.com/dokuwiki/lib/tpl/darkblue/images/favicon.ico</url>
    </image>
    <item rdf:about="https://www.garamx.com/dokuwiki/doku.php?id=vba:home&amp;rev=1744711518&amp;do=diff">
        <dc:format>text/html</dc:format>
        <dc:date>2025-04-15T10:05:18+00:00</dc:date>
        <dc:creator>Anonymous (anonymous@undisclosed.example.com)</dc:creator>
        <title>vba:home</title>
        <link>https://www.garamx.com/dokuwiki/doku.php?id=vba:home&amp;rev=1744711518&amp;do=diff</link>
        <description>EXCEL VBA

GetHangulTitle


Function GetHangulTitle(value as String)
 dim idx
 idx = instr(value, &quot;[&quot;)
 if idx &gt; 0 then
  GetHangulTitle = Left(value, idx - 1)
  Exit Function
 end if
 GetHangulTitle = value
End Function


GetDataType


Function GetDataType(colName As String, dataType As String, customerType As String)
    If customerType &gt; &quot; &quot; Then
        GetDataType = customerType
    Else
        If Right(colName, 3) = &quot;_YN&quot; Then
            GetDataType = &quot;checkbox&quot;
        Else
            …</description>
    </item>
</rdf:RDF>
